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AESTRACT 

Magnetic bubble memcry is a new digitai storage 
technology ‘that offérs many significant advantages over 
currently existing secondary stcrage media. Bubble 
memories, with high densities and relatively fast access 
times, are non-volatile semiconductor devices that provide a 
high degree cf reliability in harsh ervironments. This 
technology has the potential for a vital and unigue role in 
both the civilian and military computing environments due to 
the combination of characteristics exhibited by magnetic 
domain devices. 

This thesis presentS an isplementation of a magnetic 
burkle device utilizing a ccnventional operating systen, 
Digital Research's CP/M-86, and a standard commercial 16-bit 
micrccomputer, the Intel iSBC &6/1ZA. A fully cperational 
system capable of testing, evaluating and utilizing a 
magnetic bubble device in a standard user eénvircnment is 


presented. 
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I. TNTRODOUCTION 


Magnetic bubble memory iS 4 new digital storage 
technology that offers many Significant advantages over 
currently existing seccndary storage mediums. Bubbie 
memcries, with high densities and reiatively fast access 
times, are non-volatile semiconductor devices that provide a 
high degree of reliability in harsh environments. This 
technology has the potential for a vital and unigue role in 
both the civilian and military computing environments due tc 
the combination of characteristics exhibited by magnetic 
demain devices. 

This thesis presents an irplementation of a magnetic 
bubble device (MBB-80) utilizing @ conventional operating 
System (CP/M-86) and a ccmmercial 16-bit micreprocessor 
mance! 8086). A fully operational system capable of 
testing, evaluating, and utiiizing a magnetic bubble device 
in a standard user environment is presented. 

There are four najor chases into which this thesis is 
organized. The first phase will present an overview of 
bukble domain devices tc previde an understanding and 
evaluation of their potential applications as mass storage 


mediums. Chapter TI will describe the theory of magnetic 





burble devices and the current state of magnetic domain 
technology. Chapter III will present an evaluaticn of 
bukble memory t*echnolegy and utilization along with a 
Sicsc2 fication for the applicability of tagnetic bubble 
devices. 

The second phase will address the low-level interface 
requirements for the MBB-80 Bubbl-Beoard (prceduced by PC/M 
nc . ) when interfacing with either the Intel 8080 or Intel 
8086 microprocessor. The purpose of this phase will be to: 
(1) verify the operaticnal characteristics of the MBB-80; 
and, (2) design and implement the low-levei systems software 
necessary to interface the operating system's I/O structure 
with the magnetic bubble memory centreller. 

The third phase will address the issues necessary to 
implement the interface of the bubble memory system with the 
operating system's primitive secondary storage access 
routines. The tasks necessary in this phase are to: (1) 
design a memory organizaticn and management scheme for the 
magnetic bubble memory; and, (2) design the interface such 
chat the magnetic bubble memory appears as a "Standard" nass 
sterage device (disk) to the host operating systen. 

The fourth phase is the actual interface of the MBB-80 


Bubbl-Boards into the CE/M-86 operating system. The 


10 





interfaces and designs developed in the second and third 
phases are applied in this phase. A géneralized, 
takle-driven, "bhasic input/output systen" (BIOS) is 
develcped which will allow the utilization of MBB-80 
BukEkbl-Boards (as “disks") by the CP/M-86 orerating system 


aleng with conventional flceppy and hard disks. 
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TI. BACKGROUND OF EUBBLE MEMORIES 





A. MAGNETIC BUBBLE DOMAINS 

The entity known as the "magnetic bubble" has been much 
talked about in the context of “solid state memory 
technclogies. This secticn will present a description of 
what a magnetic bubble domain is and will describe some cf 
mes properties. No attempt wili be made to present a 
courprehensive explanation of magnetic substances or 
magnetism, but rather the Ltasic theories of magnetic domains 
me be put forth. 


Certain elements and their alloys (Fe, Co, Ni, Gd and 


Dy) along with other substances exhibit the well-known 
preperty of magnetism or, more properly, ferromagnetism 
Orci. ils p. 619}. This preperty permits a material's atoms 


to achieve ahigh degree or alignment despite the atoms’ 
tendency towards randomization due to thermal motions. 
Adjacent atoms interact and ccuple into rigid semi-parallel 
patterns. These patterns are known as ferromagnetic domain 
Structures and are localized within a specimen. Materials 
Can be cut such that their directicn of magnetization is 
meeeng a single axis (viz., aleng one particular direction) 


and are known as uniaxial ferromagnets. 


He 





Several important fpreperties ci ferromagnetism are 
exhibited when a magnetic surstance is subjected tc an 
applied (external) field. First, a relative increase in the 
external field of 0O to 0.01 will cause a relative increase 
in the substance's magnetic field of 0 to 1000 {Ref. 2: p. 
Meme tnts factor of 100,000 Gecurs Sramarily in a long, thin 
Sarple or in a closed ring of some form. Secondly, if a 
Peercle, thin, crystal sheet (film) of certain uniaxial 
ferrcmagnetic materials is cut perpendicular to the axis of 
maevral magnetization s(see Figure 2.1(a)), the domain 
structure is found to be one of wavy, or serpentine, strips 
having alternating directions of magnetization which are 
perpendicular to the surface cf the sheet [Ref. 3: p. 66]. 


It is the combination of these two properties which 


supplies an environment for a magnetic bubble domain. A 
thin ecxrystal film as descrited above, in the absence of an 
external field, will have a volume of serpentine strips 


magnetized in one directicn which equals the volume of 
eerps Magnetized in the other direction, resultirg in zere 
net magnetization. Upen the application cf an external 
Magnetic field perpendicular to the film, the strip domains 
magnetized in the directicn cf the field will increase in 


volume as che oppositely magnetized dcmains shrink in volume 


ve 
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tei. e330 Pp. SiGni. This phenomenon is the result of the 
precess of energy minimizaticn and is shcewn in Figure 
Bet (D) . As the external field increases in strength, a 
field value will be reached at which the shrinking domains 
contract inte circular cylinders; it is these cylinders 
which are known as "magnetic bubbles." These cylinders are 
emewn in Figure 2.1(c). A further increase in the field 
Will ultimately resuit in the tctal ccllapse of the 
shrinking domains, leaving the tiptmesaturated (V¥izZ., 
mgim—-tized in one direction only) [Ref. 4: pp. 3-4]. 

The applied field, known as the bias field, is essential 
for the stability of the Eubblés within a substance. The 
Dias is typically cn the order of 100-200 Oersteds (a unit 
used to measure magnetic strength), which can te eéasily 
prcevided by small, permanent magnets. This allows stable 
buktle existence independent of any power source, which is 
the foundation for non-vclatile stcrage media. The bubble 
itself is maintained by a combination of three forces. The 
Stable equilbrium cf the domain is preserved by the 
Magnetization cf the bukttrle Poel ee PLOGUCINnG ps tatcetnal 
Magnetic pressure which ofproses the squeezing force of the 
Mmopelted Fisld. The bubble domain maintains its circular 
Share because of the force of the magnetic surface tension 


Semeenc Wal) which sttsrounds the demain. [Ref. 2: p. 10] 
15 





Clearly, the absence cr presence of a magnetic bubble 
domain can be used te represent a zero (0) or a one (1) for 
data storage. However, there are several additional 
requirements which must te met before this technolcegy can be 
considered for use as a data medium. One of these 
Dpreperties is the mobility of magnetic domains. A bubble 
Will mceve towards any position which mininaizes energy. Such 
leccations can be defined and created by having small, 
meauecd fields of external bias. Unbalanced forces acting 
on the wall of the bubble will cause the bubble to move in 
the direction of the reduced bias field. By laying out a 
NMerack" of permallcy (nickel-iron alloy) on the magnetic 
film and selectively altering the local bias oon the track, 
it 1l¢ possible to move bubbles along a prescribed path. Th 
momamportant to note that, ailithough this is similar to bits 
On @ magnetic taps, there are ne mechanical, mcving parts 
invelved as the bubbles nove along this closed track. The 
fact that che bubble domains are cnly a few microns ina 
diameter and may nove at velocities in excess cf several 
meters per second can provide data crates in excess of 
several megabits per second [Ref. 2: p. 10}. The remaining 
requirements of a storage medium will be presented in the 
next section. It will be seen that magnetic bubrle domains 


can meet these requirements as well. 
16 





B. BUBBLE DOMAIN DEVICES 

This section will discuss the basic operations necessary 
#c support bubble domain devices. These operations include 
bukble propagation, bubble domain generation and bubble 
domain detection. Some basic bubble memory device 
Organizations will be presented along with the theory and 
prcblems associated with these organizations. 

The effect of abias field on predefined tracks was 
explained as the basis for bubble domain propagation. These 
tracks are in fact analogous to conventional electrical 
transmission lines in that the track carries a signal 
(bubble) to various parts of the system. To meet the needs 
of data storage it is necessary te be able to "field access" 
the propagation track (viz., access a specific location). 
meeseimplies multiple tracks (for tore than one bit) ona 
DubELS domain device that are all ccntrolled and 
Symehronized by one external magnetic field applied +o the 
entire device. By rotating this field, known as the drive 
field, a magnetic wave can be caused to travel through the 
device. The bubble domains "ride" this magnetic wave and, 
thus, propagation takes place [{Ref. 2: pp. 16-17}. Of 
cours, izt is necessary to be akle to make the bubble 


demains change ‘their directicn cf movement. Special 
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Petfalloy circuits have es designed to previde this 
muareci On. Taainonetom ne chesoLm OL “T—bar“ circuits, 
combined with special 90 degree and 180 degree corners, form 
MEAS 1G StOrage array {fRef. 3: 5. 87]. The “"T" shape is 
used because of the magnetic field effects found around the 
meng stem of the "Tt. Bubbles that move up this stem are 
trapped under the crossbar. As the drive field rcetates, the 
bukele follows around the tcp cf the "fT", eventually moving 
perpendicular to its original directicn (see Figure 2.2). 


The operation of bubble domain generation involves the 


creation of bubbles (writing 1 bits) Within the device. 
Mest generation is done by a process called nucleation. A 
emeec=nt of a few hundred millianps, maintained for 


approximately 100 nanoseconds, is used to create a localized 
Mmecld in opposition <*o the bias field. This reverses the 
Magnetization on the filn, which causes the creation of a 
new bubbl? -~- its size and foSiticn being finally stabilized 
Peeecne bias field [Ref. 4:3: pp. 3-7}. It is noted that the 
precess of nucleaticn is temperature sensitive and an 
implemented system must frovide a means of varying the 
gereration current to neet large temperature changes (failed 


nucleation or mnultiple nucléations can occur). 


18 
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There are several apprcaches to the problem of bubble 


M@emain detection, . Or teading bits. One technigue is a 
non-destructive readout scheme. A magnetic dcmain has 
asscciated with it a small magnetic field. As the bubble 


passes a suitable sense amplifier detector circuit, there 
will te a small change in the resistance of the circuit due 
to the magnetic field of the bubble. This detectcr iS known 
as a magneto-resistive senscr and has the advantage of being 
a passive (no overhead) detection scheme. Unfcrtunately, 
the "signal" that is measured, or read, is but a fraction of 
the total power of the bubkle domain. The second approach 
1s one of a destructive readout. The bubble domain is 
Side-tracked onto a special detection/generation track. 
Here che full power of the domain is sensed (causing the 
destruction of the bubble if one is present) for a stronger 
readout signal. The bubble (if present before teadout) must 
now be re-generated and returned to the storage track [Ref. 
5: pe. 41]. This re-nucleation coviously requires more power 
and more supporting dé¢vices than the passive readout 
schemes. 

The operations pessiblé with magnetic bubble dcemains can 
Besvlc in a wide variety of architectures fcr bubble 


devices. Some of the nore scphisticated designs will be 





presented in Section 0D cf this chapter. An explanation of 
the first, and Simplest, bubble domain device will be 
discussed here. 

An analysis of the magnetic device from a top-level view 
reveals a basic structure as seen in Figure 2.3. A 
devices will correspond to this structure and, by some 
means, implement the functicnal blocks as seén in this 
e7guce. Only the function of redundancy management was not 
discussed in the above sections. This is basically the 
issue of how manufacturing techniguées result in a certain 


chip yield (viz., the useakle perticns of each bubkle chip). 





Me is sufficient to say that various mechanisms are 
available to provide redundant storage capability in a 
device and to keep a mac cf this redundancy. One nethod 
will be discussed in Chapter IV, Section A. 

Magnetic bubble devices aré serial storage devices with 
bleck access capabilities. They are similar to ccnventional 
electromechanical media, but with several major differences. 
BurEklés can ce stepred and started at the bit level whils 
most devices are bleck-oriented at a larger data volume. 
Burkbles do not have mechanical addressing aids l:ke 
Start-of-tape, disk tracks and sectcrs or optically-sensed 


index markers. Some other means of identifying and locating 
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data is necessary. It is the chosen means of addressing 
that influences «he device design of tubble storage. 

The Simplest magnetic bubble domain device uses the 
shift register organizaticn. This is depicted in Figure 
2-4(a). Bubble domains rotate around a fixed, closed loop 
with a simple generator and detector circuit. Average 
access times require propagaticn of a bubble through half 
the register. Transfer rates are dependent cn serial 
bit-by-bit ‘transfer through the detector. This simple 
device points out the three operational characteristics 
(which the shift register does not address efficiently) that 
influence the design cf burkle devices: (1) need for high 
data density; (2) fast access time; and, (3) fast transfer 
rates. 

The major/minor loop chip organization depicted in 
Figure 2.4(b) was the first attempt to address the need for 
improvement in these characteristics. This scheme is 
basically one of block transfer between the mincr storage 
leccps and the major operational loop. Ba Gi rectiona. 
transfer gates allow a block of data equai (in bits) to the 
humsber of minor loops to be transferred to/from the major 
Meer in a single operaticn. Peaster “OL agli’ bits in 


parallel is achieved by a pulse to the commen transfer bar 
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between the majcr loop and the minor loops. The minor loogs 
rotate in synchronization with the majcr loog. The major 
locp makes one revolution tc perform its operation, then the 
data on the major loop is read tack to, or written into, the 
mincr loops. This clearly has the advantage cf being a 
Simple, e2asy-to-build device that provides some degree of 
increased data storage and access times. However, this 
device, implemented as a single entity, still suffers fron 
serial readout and slow external transfer rates. 

The next section will digress to discuss the history and 
development of bubble domain device technology. he Ls 
presented merely as a histcrical perspective to provide the 
context for the discussion cf architecture and technology in 
seeticn D of this chapter. 

C. HISTORY AND DEVELOPMENT 

Bubble domain devices are a relatively new technology. 
The discovery of garnets, a gqlasslike substance, in 1956, 
allcwed the fabricaticn cf an environment condusive to 
Magnetic domains. In 1959, the first bubble and serpentine 
decmains where observed in certain ferromagnetic substances. 
A. H. Bobeck, of Bell Telephone Labcratories, presented the 
=2rst a€escription Ba ctubble devices at the 1967 
International Magnetics conference. Bubble domains were 


metered at chat time. [Ref. 6: f£. 3] 
25 





Dicedepie. sOmmetne bubble demain cccured in 1969, when 
Bereck, at the INTERMAG conference, updated his 1967 
presentation. He Clearly showed the foac tee ty. OL 
centrolled bubble propagation in a shift-register device, 
aleng with bubble generaticn, replication and detection. 
For the first time, bubble dcemains were seen in the centext 
of mass memory media. The technical interest generated at 
that conference scon had an effect on the business 
community. 

Rell Systems, where the first bubble devices were 
designed, utilized this technclegy for repertory dialers, 
voice message recording and fixed-head-file replacement. 
Hitachi was the first company to anncunce a magnetic bubble 
memcry product (Oct 1975) which was an 18-chip, 32K byte 
unit intended for office machines. Hewlett-Fackazxd quickiy 
Ecllowed with applications in desktop calculators. 

Texas Instruments intzreduced the first general purpose 
bubble device in 1977. This 1s a 92K bit memcry module 
which they utilized in their portable terminals. i. eis 
interesting +o note that at this time several of the largest 
Semiconductor memory manufacturers (TIatel, Siqnetics, 
Rockwell International and National Semiconductor) entered 


“he arena of tubble devices. 


w 
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The early 1980's have breught the advent cf 1M byte 
bukttle devices with transfer ratés tno wexcessMof 800 
Kbitsysec. A detailed analysis and compariscn of the 
different memory technolcgies and applications will be 
presented in Chapter III. The historical development of 
bukble memory devices can be referenced to the basic 
characteristics and operations presented in this chapter. 
The driving inpetus has beén cn previding denser packaging 
(more bits), faster access times and higher transfer rates. 
All cf these factors have been necessarily constrained in 
the context of marketability and manufacturing costs. These 
considerations have produced many néwcomers into the field 
aleng with revolutionary designs and architectures fcr 
Magnetic bubble devices. However, the develcpment of a new 
technclogy that must Simultaneously compete with established 
technologies (semiccnductcr, disk) has proven to be a 
liriting factor in the advancement of magnetic bubble 
devices (TI and National withdrew from the market in 1981 
Meme Seasons cf profitability). 

D. CURRENT TECHNOLOGY AND ARCHITECTURE 

The attempt +0 impreve the performance characteristics 

of bubble domain devices has preceeded along three distinct 


Detns. First, has been the imprevement of the components 
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making up the bubble device itself (viz., sense amplifiers, 
garnet substrates, etc.). Secondly, there has been much 
Mercrs directed at finding an optimal architecture for the 
basic major/minoer locp organizaticn. Finally, the extensive 
Meen,of support circuitry and sophisticated controllers is 
presenting a more simplified logical view (as seen 
externally) of magnetic bubble devices. 

The design of physical compcnents for the bubble devices 
is inherently coupled to the issues of mnagnetisn, field 
electronics and garnet manufacture. An extensive discussion 
of these topics, hewever, is not within the sccpe of this 
thesis. Therefore, only menticn cf the areas cf work in 
Current research will be made here. The coil drivers, as 
Originally described, produced a sine wave which propagated 
bukble domains threughcut the device. These sine waves, 
which start and stop precisely, are difficult te implement 
at a low cost and have, th¢erefcre, been replaced Ey devices 
that generate triangular cr trapezoidal wave forms [Ref. 5: 
ole 41]. Bubble detection, whether destructive or 
non-destructive, has ncen-trivial current requirements for 
the sénse amplifiers. A reduction in the number of and 
power tequirements for current sources is a primary goal of 


Meeeeec.1ON Circuit design. Eiclivye she issue of high bit 
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density per unit cost, as in all memory devices, is being 
addressed by new garnet substrates. The work in this area 
has the goal of reducing the size of the bubble dcmains and 
putting as many tracks as pessible cna chip while avoiding 
inter-bubble interference [Ref. 7: Ee 63 ]. Current 
technology is supporting 1 Mbit devices with areas of less 
than cne Square centimeter and with a bubble domain diameter 
of two (2) microns. 

The first bubble domain device architecture, the shift 
register, suffered from twce main inadequacies: (1) a single 
defect in the shift register chain resulted in a bad chip; 
and, (2) data just entered Lad to be cycled through the 
entire shift register chain tc be read, resulting in slow 
data access. The major/minor lcop design addressed these 
prceklems. Data 1s generated in a majer loop, circulated, 
read and rotated back to ke restcred in the original minor 
ieee fOSitions. Shorter cycle times are achieved if this 
need to restore data is removed. This idea was incorporated 
mee “he “block reéeplicare' architecture. This is a4 
multilcop arrangement where the mincr loops communicate wir! 
a read track via replicate/transfer gates, allowing reading 
Without disturbing the mincr locp data (see Figure 2.5). 


Erasure is accomolished by activating ‘tzranster without 
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Beplicate. A separate write track allows block data to be 
woitten to the nincr locps via transfer-only gates. The 
idea behind the replicateytransfer gate 1s that a bubble 
domain is replicated (by splitting or nucleating a new 
burble) and then transterred to the read track for 
Beccessing by the detector. The conventional major/minor 
Meer d2sign did this one bit at a time on the major loop 
whereas the block/repflicate design replicates, in parallel, 
all the minor loop bits in a block. 

The physical makeup of bubble domains and their 
resulting inteéeracticns requires that ginor loops have bubble 
domains two (2) bits apart (viz., an empty position between 
every positicn where there could be a domain). 
Conseguently, amajcr lcop or read/write tracks could only 
generat on every cther cycle, that is, they would cycle 
once uselessly while the minor loops cycled to hypass the 
empty positions on the majer locp. Data can be read on 
every cycle by splitting the data storage intc odd bits 


Mecops) and even bits ({lecops) [(Rer. 3: Bes). This 


eee cectite is depicted in Figure 2.6. To perform a write 
operation, the entire bicck is generated in Ecth write 
weacks, The odd and even generate tracks are aligned 


Simultaneously with the miner lcorps and the write takes 


51 





9PINIISITYIIY Uusagq/ppo erIedsttTday/YIoTgG g9°7 aanSstry 


ce ae 


® eaerttytuuy 












(SQTq uana) (S3Tq ppo) 






—s ee eee — = 


Sdoot JOUTW 


—_ 


“sdooy zoutw 






Laysuezy 
fae 7eottday 





Loa sia ao 





place. To perform a read operation, the replicated gaté¢s 
are activated on the odd and even stcrage loops. The two 
tracks are one bit apart so that the odd and even tracks are 
interlaced as they ge to the detector, providing a read on 
Bevery bit position. 

All the multiloop architectures use redundancy to solve 
the problem of defects in chip manufacturing. Extra storage 
Capacity is provided on the chip by having more minor loops 
than are actually reguired to meet the device memory 
capacity. Bad loorgs, normally discovered in factory 
testing, are located and put into some form of a map. 
Defective locp addresses are usually stored in a PROM within 
the bubble centroller cr in seme c& the redundant loops 
themselves. [Ref. 3: p. 87] 

To become an econcmically practical and versatile 
device, it is e¢sséential that bubble meémories present a 
furctionally Simple and logical view to potential users. 
Much effort has been put forth in the area cf support 
SeEecuitr Which handles the low-level functions involved 
with the management of bubble devices. The biggest addition 
to the support circuitry has teen in the area cf bubble 
mémcry controllers. These centrollers (which are usually 


4O0-pin HMOS devices) provide bus interface, généerate all 
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system timing and céntrel, maintain memory address 
infcrmation and process the user's external software 
reguests and commands to the bubble devices [Ref. 8: p. 57}. 
The conceptual purpose of the controller is to make the 
magnetic bubble memory lock like a peripheral te the host 
computer. The sense amplifiers used for detection have been 
inccrporated to include multi-channel capapilities (viz., to 
handle parallel readouts ffrem mcre than one device to allcw 
high data transfer rates). This results in a logical memory 
Organization which can span "n" devices, where "n" is the 
number of bits in the host system's word size or data bus 
size. Data protection and save-circuitry have been provided 
to.06©prevent bubble ccntamiraticn in the event of a power 
less, which can lead to a situation where loops are not 
memeated back to their Starting point. This is necessary for 
Senrect addressing. Th2 contreller, uciliziag a bad-loop 
Map, also automatically substitutes redundant loops for bad 
meercs On a chip. 

The current architecture and technology of pubbtle domain 
devices are influenced by the need tc compete with existing 
seccndary nemory devices. Consequently, much effort is 
being put intc both the physical manufacturing of the bubble 


devices as well as into the logical architecture and user 
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micet face. hoeevomecleakbewnac  ahy architecture tust allow 
Magnetic bubble memories tc be easily interfaced to existing 
computer systems. 


The next chapter will provide an analysis and comparison 


of magnetic bubble devices to current menory technologies, 
With particular emphasis on the specific strengths and 
weaknesses of magnetic devices. Applications fer magnetic 


devices will also be discussed in depth. 


aS 





Esa APPLICABILITY CF MAGNETIC BUBBLE MEMORIES 
A. CCMPARISON OF MASS STORAGE TECHNOLOGIES 

Magnetic bubble memories shculd net be considered to be 
in direct competition with existing, well-established forms 
of non-volatile storage. Rather, bubble memories should be 
viewed as a secondary storage technology which can fiil the 
well known capacity/cost and performance/cost gaps in 
conventional memory hierarchies. 

In Figure 3.1 are plotted the areas inhabitable by a 
wide range of memory technologies. AS can be seen in Figure 
Bel, there is a large gap between core technology and 
fixed-head disk technology. At present, attempts to fill 
this gap ar¢ being made by electron-beam accessed memories 
(EBAM), charge-coupled devices (CCD) and magnetic bubble 
memcries (MBM). Although EBAM probably has the lowest 
petential ccst per bit cf the three technolcgies, act 
requires fragile vacuum components which severeiy limit 
meet ications. 

CCD technology has not sufficiently surpassed dynamic 
RAM technology to become preferable from either an economic 
Or a performance standpoint. Currently, CCD memcry access 


times (approximately 100 micreseccnds) are much Slower than 
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these of semiconductor Kam (70-2000 nanoseconds). An 
additional disadvantage of CCD memory is its susceptibility 
mo alilphaparticle radiaticn. As is the case with RAM 
technclogy, as memory densities have increased, the 
capacitance needed to store the charge for each bit has 
decreased, making it more prcbable that an alphaparticle 
strike will cause a soft error. { Ref. 9] 

Magnetic bubble memories, cn the other hand, have the 
advantages of non-volatility, higher density and lower cost 
per bit over CCD and RAM technologies, and the advantage of 
solid-state technology over EBAM. Evaluaticn of the 
performance of magnetic bubble memories is usually 
accomplished utilizing the same parameters as those used for 
evaluation of floppy disk devices. Valid compariscns can be 
mad¢ between the performances of the two technologies 
because of thelr common roles as secondary storage 
technclogies. 

Magnetic bubble memcries are organized as shift 
registers for block access, with ‘the natural block size, 
referred +o as a page, being equal to the number of ninor 
MOcrs. Access to data 1s accomplished by shifting bubbles 
in the minor loops and transferring the apprepriate page <+o 


the major loop. The data is then read or written by 
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shifting bubbles around the major loop. This organization 
allews for the computation cf both a seek time and an access 
time to parallel disk performance measures of the same 
names. 

The seek time of disk systems is normally taken to mean 
the time it takes te mcve the read/write head tc the track 
centaining the desired data. This is analogous to rotating 
+he minor loops in a magnétic bubble device to place the 
desired page on the major loop. Seek time for a bubble 
memcry device is, therefcre, dependent on the number of 
shifts required in the mincr loops and the shift rate of the 
device. Current bubble memory architectures contain from 64 
tc 4096 pages in the pincr loops and have a relatively 
cc@mon shift rat2 of 100 KHz [ Ref. 10: Die ee el Taking 
worst case to be a ccmplete rotation of the minor loop at 10 
Microseconds per shift results in worst case seek times of 
6.4 ~ 41.0 milliseconds. Assuming half of these values +o 
be an average yields average seek tines of 3.2 - 20.5 
milliseconds. 

Cembining this seek time with the time required to 
mereace to the first bit of data in the read or write track 
yields the data access time fcr a magnetic bubble device. 


By assuming an average major loop size of 144 bits (the 
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@etual major loop size of the TIB0203 92K bit dévice) and 
aprlying the shift rate of 100 KHZ, a worst case read/write 
delay time of 1.44 milliseccnds is obttained. Combining this 
delay with the previously computed seek time results in 
average access times of 3.92 - 21.72 milliseconds for 
magnetic bubble devices, which 1s considerackly faster than 
the average access times of 115 - 500 milliseconds for 
mmeppy disk devices. {Ref. i1: p. 1} 

The data transfer rate for a magnetic bubble memory is 
determined by the number of bits per fage, the shift rate of 
the device and the number of cycles required to transfer the 
Berge Of data out cf or into the device. BaSic transfer 
rates are 40 - 100 Kbitsysecond for individual magnetic 
bubble device organizations. These rates may ke greatly 
improved by operating magnetic bubble devices in parallel 
(mere than one device at a time). Bubbl-Tec's HDC/HDB-11 
system, for example, utilizes four 1M bit bubble devices in 
parallel to attain a peak transfer rate of aprroximately 8090 
Kbitsysecond [Ref. ws p.. -29e). Such uses of parallel 
implementaticns allow magnetic bubble systems tc achieve 
transfer rates in excess cf those cf Zloppy disk devices 


(ieee — 500 Kbits/seccnd). 
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The solid-state nature of magnetic bubble devices is a 
mecat COntrsbuming factor to their reliability. Since »there 
eee 0C mevying parts, the maintenance normally associated 
with electromechanical devices is avoided. An additional 
characteristic of magnetic bubble téchnoiogy is very low 
Smpor lates. Manufacturers! tests have produced hard error 
meeees Of 1 in 1 trillion bats and soft error rates of iin 1 
Bemreaon bits [Ref. 1s pe. 2]. A hard error occurs when a 
bit is read incorrectly during several consecutive read 
Operations. Soft errors occur when a bit is read 
incerrectly cn one read cperation and correctly read on 
Subsequent operaticns. 

The final area of evaluation deals with the physical 
characteristics of the dévices. Some additional froperties 
attrikbutabl2 to the solid-state nature of magnetic bubble 
devices are low power requirements, light weight and 
ruggedness. Magnetic bubble memories may be sealed from the 
outside world and, thus, are immune to che effects of dust, 
Bemeditys, dirt and vibration. Like mest other technologies, 
however, Magnetic Eubble memeries do suffer temperature 
igepitations. iiesmetigitattonseis due te the required 
matching of the temperature coefficient of the chip garnet 


*o that of the permanent magnet. Currently, the specified 
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operating temperatures range for most bubble devices is fron 
0 te 50 degrees Celsius but nen-cperating temperatures may 
range from -40 to +85 degrees Ceisius without Ilcss of data 
fevet. 11: p. 2]. 

Magnetic bubble memory technology can provide a high 
density, low power, rugged, reliable and non-volatile data 
stcrage media. I* is expected <that the cost of bubble 
memery devices will continue to decrease and their densit 
will continue to increase, making them an even more viable 
alternative mass storage technology [Ref. 12: p. 38]. 

B. APPLICATIONS OF MAGNETIC BUEBLE MEMORY 

The variety of applications for magnetic bubble memories 
is steadily increasing. As system designers begin to take 
advantage of the properties of magnetic bubble memory 
devices, increasing numbers cf bubbie memories are being 
designed into systems, added on as back-up storage or used 
+o replace other storage technologies. The variety of 
applications for magnetic bubble devices includes word 
precessing, voice synthesis, portable terminals, 
ccmmumications, numerical machine ool Centrolleors, 
aerospace and defense applications as well as others [{Ref. 


ieee cp. 38]. 
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The high performance and low ccst of magnetic bubble 
devices are the two major characteristics driving most of 
meme applicaticns. Current prices fer bubble memories are 
roughly 100 millicents per bit with projected decreases to 
Mess than 30 millicents per bit in mid 1982 [Ref. 10: pp. 
Eo |. Access times of currently available bubble memories 
acre approximately ten times faster than these of movable 
head disks and the data transfer sates of the two 
+echnologies are comparable [{Ref. 13: p. 53]. Some magnetic 
buktle memory systems have, however, attained data rates of 
96 Mbits/seccend and a system addressability of 4096M bits 
fRer. Ws p. 141). Ancther performance advantage is the 
Simple addressing scheme which reguires only an address and 
meeeead Or Write signal. It is estimated that a bubble 
memecry contrcller would have 1/4 to 1/2 the complexity of an 
Souavalenc disk controller [Ref. 15: p¢. 37]. 

Another major contributing factcr to the increase in 
applications of magnetic bubktle devices has been the 


development of custom interface and support circuits. These 


i) 


integrated devices free the system designer from the néed to 
beceme intimately familiar with the electrical and nagnetic 
preperties of bubble memories, thus, allowing more time to 


be spent on the system aspect of the appiication. There are 
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alsc many complete magnetic bubble memory system assemblies 
mmmchneecan be plugged directly into DEC LSI-11s, Intel 
MULTIBUS systems, Tr 9900s, S-100 systems and STD-bus 
machines [Ref. 10¢p. Zo. Custom constructed systems 
reguire no separate chassis or power supply and can be 
censtructed entirely cn printed circuit boards that can plug 
feecectly into existing bus structures. 

Research conducted by IBM (San Jose, Calitcrnia) has 
indicated that magnetic bubktle memories must have a capacity 
of at least 4M bits in order tc challenge RAM devices on the 
basis of cost. Bubble memory devices are approaching this 
density with 1M bit devices currently cn the market 
Mero1000, Intel 7110 and Naticnal NEM2011). Rockwell has 
déemenstrated a 4M bit device developed under military 
contract and Bell Labs has fabricated an experimental 11.5 
Bec bubble device which is only 1.3 inches square. [Ref. 9] 

Since magnetic bubble memories are of a solid-state, 
non-volatile technology, they are ideally suited for 
Mestable applications as well as for vroviding additional 
Secrage for traditional and fcarallel processing systems. 
The compactness, low power reguireament, quietness and low 
Maintsnance requirement have made pubble devices ideal for 


office equipment applicaticns. Additionally, she rtuggedness 


4a 





Of the devices, when combined wita the above 
@enmaracteristics, makes them idscal for use in the harsh 
environments often encountered in control and military 


applications. 
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IV. DESCRIPTION OF THE DEVELOPMENTAL SYSTEM 
A. TIBO203 MAGNETIC BUBBLE MEMORY 

The TIB0203 magnetic-ctubble memory is a non-volatile, 
92,304 bit, bubble memory chip. The chip is manufactured as 
a wW-pin dual-in-lin2? package which contains the coils for 
Previding a rotating magnetic field, a permanent magnet to 
maintain data storage and a magnetic shield structure. The 
TIEQ203 is designed aS a ccnvéenticnal major/minor loop 
architecture with 144 minor lceors (circular shift registers) 
of 641 bits each. Transfers of data to or from the single 
mMajcr loop are done in parallel. The major loor contains 
the detector circuits as well as the generate, replicate, 
mmemannathzlate control functicns. [Ref. 163 p. 11] 

Detection is acccmplished in a passive scheme utilizing 
twe magneto-resistive elements. These elements are out of 
phase with 2ach other and cperate on alternate cycles (viz., 
eeternately reading bit positions). Noise produced in the 
@eecuit due to circuit laycut, control puisées and from the 
magnetic fields is réduced ry cancellation when the elements 
are used with a bridge circuit and an external differential 


Semevitier. (Ref. 16: p. 14] 





Generation of bubble dcemains is done via nucleation as a 
specified current pulse is sent through the generate loop. 
Transfer-in is accomplished as follows: (1) a data string 
equal in length to the number of minor loops (calléd a paqeé) 
is generated; (2) this string is shifted such that the first 
bit is positioned over the first minor loop; (3) the 
transfer gates are energized. Each of the 641 minor loor 
page positions is useable. Transfer-out is accomplished in 
the reverse manner. Once a page 1S on the major loop it is 
eligible for one of two oferaticns in a serial bit-by-bit 
manner: replicate or annihilate. {Ref. 16: p. 11] 

A replicate operation causes the bubble domain to be 
stretched, then split in twe with one bubble diverted to the 
detector and the other diverted back to the majcer loop and 
sukseguently to the mincr lcop for stcrage. This procedure 
prevides for a non-destructive readout. Annihilation is 
prcvided by transfering she bubble domain off the najer loop 
and into the deéetecter track where it is »oropagated off the 
ee C . 

Moe chip is manufactured with 157 ninor locps, which 
prcvides a redundancy of 13 minor loops. Dezective minor 
feces are identified at the factory and &@ map is printed on 


the device before shipment. The map nas the addresses of 
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defective loops printed in hexadecimal and it is the 
responsibility of the controller to prevent the use or these 
Meee loops. (Ref. 16: pe. 12] 

The coil drive for the TIBQ203 uses triangular wave 
forms generated from ¢wo orthogonal coils that are driven 90 
degrees out of phase. A cycle is the time required for the 
magnetic field to rotate 360 degrees. Minor loops are 
spaced two bits apart with one bit separation on the major 
locp. Therefore, all major lecp cperations are performed at 
half the drive frequency. The drive freguency for the 
Oeeeo203 is 100 KHz. [Ref. 16: pp. 13-14] 

The TIBO203's components and Specifications are 
ccmpletely described in Reference 167 the "TIBO203 
Magnetic-Bubble Memcry and <Asscciated Circuits Manual." 
Operating characteristics, block diagrams and environmental 
Serditions for leone tuncel:on timing generator, sense 
amplifier, function driver, coil driver and thermistor are 
alsc included in «his manual. 

See ©C/M MBB-80 BUBBLE MEMORY SYSTEM 

MBB-80 Bubbli-Board is the registered trademark of a 
magnetic bubble device marketed by Bubbl-Tec, a division of 
Pacific Cyber/Metrixs, PAC mecatecd 22 “Santa Clara, 


Sar rcrnia. The MBB-80 is a ccmplete bubble memcry storage 
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system designed to te compatible with all 86-bit and 16-bit 
micrccomputers that utilize Intel's MULTIBUS architecture. 
The board provides 92,304 eight-bit bytes cf nen-volatile 
memcry as w2ll as all réquired ccntrcl logic and buffering 
necessary *o interface to the MULTIBUS systen. 

The entire system is contained on one multi-layer, 
Meeanced-circuit board. The printéed-circuit board has the 
standard MULTIBUS dimensions and requires one card-cage slot 
on the MULTIBUS. The board is built around eight (8) of the 
TIEQ203 bubble memory devices described in the preceding 
section. All necessary support chips are included cn the 
Single board. The functicns cf the controller are provided 


in hardwar2 and include the following primitive commands: 


Pol Butter Read Multiple Pages 
Empty suffer Teecialize 

Write Sin a Page Read Status 

Read oe ng e Page FnableyDisable Interrupt 
Write Mu eis Pages Reset 


Host interface with the contrcller is via memcry-mapped I/0o, 
uSing sixteen (16) consecutive user-defined locations in the 
CPU address space. The MBB conmeroller can be set to 
recognize any sixteen consecutive addresses cna 16-line or 
20-line address bus. These sixteen addresses correspfend to 
Sixteen registers in the bubble memory ccentrciler which are 
Memr=zed tO read status information, set MBE-80 board 
configurations and perfcrm read/write operaticns. 
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The MBB-80 typically consumes less than 20 watts of 
powel. Voltage requirements consist of +5 volts at 1.5 
amgeeres, +12 volts at 200 milliamps and -12 volts at 700 
milliamps. Logic is provided to protect stored data during 
power-up, power-down and when unexpected power failures 
Seccur. The MBB-80 can opéerate in a temperature range of 0 
to 50 degrees Celsius. The magnetic environment is less 
than 20 Oersted at the bubble device and the roard weighs 18 
ounces. A complete description Of the ABE=80, its 
printed-circuit board layout and schematic diagrams are 
ccrtained in Reference 17. 

C. DEVELOPSENTAL SYSTEM 

The INTELLEC Deuble Density Microcomputer Development 
System (INTELLEC DD MDS) with an 1SEC 86/12A single-board 
computer, an 1SBC 202 double density disk contzoller and the 
CP/M-86 (version 1.0 as modified by Reference 18) operating 
System (hereafter referred to as CP/M-86) is the host systen 
for this implementation. This system is located in the 
Microcomputsr Laboratory at the Naval Postgraduate School, 
Menterey, Gate rOra=a, “Abad will be ~descrited in greater 
Meat. in che next section. This hest system was found to 
have a severe inadequacy in the area of software deveicopment 


fecls. Rhe Bexz renee CP/N=806 operating system had no 
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macerface tO a printer. The CP/M-86 resident text editor 
(EL) consists of relatively primitive commands which do not 
allow a wide range of text manipulaticn. For these reasons 
an alternative system had to be chosen for use in software 
develcpment. 

‘fhe text editor chosen was the screen-oriented editor of 
+he Altos UCSD Pascal (Version 1.4b) system. Required Intel 
8080 and Intel 8086 assembly language programs were written 
in files created utilizing the Pascal system editor. The 
overall efficiency of scftware development was greatly 
enhanced by the use cf this editor. Once a file was 
completed, it was transferred to the Altos CP/M-80 (Version 
2.2) system by executing the 8080 assembly language prograag, 
CFXFER, which executes under CFEF/MN-80 (hereafter referred to 
as CP/M). CPXPER is a Naval Postgraduate Schcol (NPS) 
Microcomputer Laboratory utility program that provides for 
the intersystem transfer cf formatted files between the 
Altcs CP/M and Pascal operating systems. 

Once transferred to the CP/M system, Intel 8080 and 8086 
assembly language programs could be assembled utilizing the 

standard, CP/M resident, Intel 8080 assembler (ASM) or Intel 
80&6 cross~assembler (ASM86), respectively. ErPEors 


enccuntered during asserbly couid be corrected utilizing the 
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Gey residen= editor (TED) and a corrected copy cf the file 
transferred back to the Fascal system for purposes of 
consistency. Once a program is successfully assembled it is 
ready to be transferred to the sENnEGLEC DESIMDS for 
execution. 

The Intel 8080 or 8086 executable files (.CCM or .CMD 
Beepectively) are transferred to the INTELLEC DD MDS by 
utilizing the NPS Microcomputer Laboratory utility progran 
called SDXFER for intersystem transfer of files kretween the 
Single density INTELLEC MDS and the INTELLEC DD MDS. Files 
@emebe transferred directly frem any CP/M compatible disk, 
on either drive of the single density MDS, tc any CP/M 
compatible disk on either drive of the double density MDS, 
Teel izing SDXFER. 

All complete assembly language programs are maintained 
on the Altos UCSD Pascal system disks only. The Altos CP/M, 
dcuble density MDS CP/M and dcuble density HMDS CP/M-86 
system disks contain cniy executable files. 

D. ISPLEMENTATION HOST SYSTEM 

The final implementation utiiizes the previously 
Mentioned host system ccnsisting of an INTELLEC Deuble 
Density MDS system and iSBC 202 disk controlier, krecth under 


*he control of an iSEC 86/12A singlée-kbtoard computér, and the 
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CPy/M-86 operating system. Initial low level bukkle memory 
Mesting was conducted utilizing the iNTELLEC DD MDS and its 
resident Intel 8080 microprocessor. After initial testing 
of the device, all remaining development, testing and 
implementation utilized the iSBC 86/12A and its Intel 8086 
microprocessor instead of the Intel 38080. 

The INTELLEC DD MDS is a coordinated, complete computer 
System designed around the Intel 8080 microprocessor. The 
Standard INTELLEC OD MDS system consists of an Intel 8080 
Microprocessor, ‘two (2) 32K oyte RAM memory modules, a 
moniter program With) Six ~(6) fully iaplemented I/0 
interfaces and a frent panel control module, used to provide 
a z56 byte boctstrap pregram, che eight (8) level bus access 
memesCl Circuitry and areal time clock. These systen 
mceduleés are contained in an eighteen (18) card chassis which 
features the Intel MULTIBUS, which supports multi-processor 
configurations and allows for "master-slave" relationships 
between modules. The one addition to the standard system is 
the use of an iSBC 202 double density disk controller nodule 
Mmemneandie the duai flcpry disk dzives. [Ret. 19} 

As previously mentioned, once past the initial testing 
phase, the INTELLEC DD MCS system was operated with the iS3C 


86/12A. This was acccmpiished by removing the two memory 
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boards and the Intel 8080 CPU board and placing the 1SBC 
86/12A in a bus-master slct {an odd numbered slct) in the 
INTELLEC DD MDS chassis. The 1SBC 86/12A is a Single-board 
micrccomputer based on the Intel 8086 16-bit micreprocessor. 
Included on the board are 64K btytes of dynamic RAM, three 
pregrammable parallel I/0 ports, programmable timers, 
Merority interrupt cecntrcl, serial ccmmunications interface 
mmogmiuULTESUS interface control logic. [{Ref. 20] 

The CP/M-86 operating system utilized with the host 
System is a product of Digital Research. The specific 
opérating system used was Version 1.0 with the nodifications 
made in Reference 18. CP/M-86 1s a Microcomputer operating 
System for Intel 8086 based nicrccomputers. CP/M-80, the 
predecessor of CP/N-36, was designed for Intel 8080 based 
micrccomputers and, as nearly as possible, file 
compatibility between CE/M-80 and CP/M-86 has been 
Maintained. CP/M-86 provides built-in utility ccmmands and 
transient system pregrams. Additionally, the user has the 
ability to e¢xecute usexr-defined transient programs. The 
System transient programs includée a dynamic debugger 
[ap186) , a primitive text editor (ED) and an Intel 


a 


ccmpatible assembler (ASM86). (Ref. 18] 
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The entire implementaticn host system is located in the 
Microcomputer Laboratcry at the Naval Postgraduate School, 
Monterey, California. Each of the individual components of 
the system (INTELLEC DD MDS, iSEC 86/12A and CP/M-86) is 
described in great detail in the reference listed after the 


discussion of the component. 
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He LOW-LEVEL BUBBLE DEVICE INTERFACE 
A. INTEL 8080 IMPLEMENTATION 

Prior to interfacing the MBB-80 Bubbl-B&oard with the 
moeec 86/12A, initial testing was ccnducted by interfacing 
+he MBB-80 with the standard INTELLEC DD MDS system and its 
resident Intel 8080. The Intel 8080 was chosen for initial 
MBE-80 testing because of the aucthors' famliiarity with 
Intel 8080 assembly language and because of the availability 
and utility cf the existing CP/M-80 operating system and 
Support programs (viz., DDT and TED). 

Before any software interfacing or testing could be 
attempted, the hardware interface between the MBB-80 
Bubtbl-Board and the INTELLEC DD MDS system had to be 
ccnstructed and verified. This interfacing reguired <+«he 
modification cf oower circuits within the MDS system and 
necessitated the addition of a manual power-protect switch. 
The mediftication of power circuits was required tc orevide 
meme 0.950 amps at -12 yYOoLts reguired by the MA¥BB-80 
Mee i-Board circuitry. The remaining power requirements of 
the MBB-80, 1.0 amps at +5 volts and 0.12 amps at +12 volts, 
are available on the standard MDS system's bus. The manual 


pcwer-protect SWicem was provided On an additional 
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develcpment board and was required to protect the bubble 
devices during normal power-up and power-down. Bubble 
device contamination, as described in Reference 17, can 
result if the bubble devices are accessed while the power 
supplies ar2 not within the specified tolerance of plus or 
Minus 3 percent. The manual switch provides protection only 
during normal power-up and fower-down. A more comprehensive 
power-protect system will be needed to previde full 
pretection against inadvertant power loss in a froduction 
system. [Ref. 17] 

Software interfacing and testing of the MBB-80 was 
cenducted by writing and executing an Intel 8080 assembly 
language program called DIAG80O.ASM (a program listing of 
DIAG80.ASM is contained in Appendix A). This program 
utilizes sixteen (16) consecutive addresses, beginning at a 
prcegram defined bubble memcry centrcller base of O4OO00H, as 
registers for communicaticn with the MBB-80. Dae faenrpit 
ROF/RAM signals provided by the pbukble memory controller 
allcow the placement cf the controller base address and the 
Sixteen registers anywhere in the on-board 64K bytes of RAM 
net in direct conflict with CP/M-80 usage. 

Initial attempts at execution of DIAG80 resulted in 


premature program ‘*ermination. Attempts at dekugging the 





pregram by using DDT failed because single-stepping through 


+he program resulted in proper execution. Full-speed 
execution, however, Gomecrmuecdas tC .result coin. premature 


termination at unpreéedictatle and unrelated points in the 
pmecgran, indicating either a timing or a device 
compatibility problem. Further investigation revealed that 
the terminaticn of execution was accompanied ty a bus 
timeout signal from the MDS system (the bus timecut signal 
Ac initiated when a bus request is madé and no 
acknowledgment signal is received within a specified tine 
interval). 

Monitoring various signals with an oscillosccpe led to 
the detection of an inccnsistency between the monitored 
Signals and the specifications cn the MBB-80 circuit diagran 
previded in Reference 17. While checking the ccmparators 
(utilized to determine if an address cn the bus is that of a 
bukble memory controller register), it was determined that a 
Signal of some sort was present on pin 7 cf each of the 
Phites cctparators. The circuit diagram indicated that these 
pins should all be connected to the common board ground. 
Upen contacting the designers cf the MBB-80, it was Learned 
Miata’ Circuit diagram currently being distributed was for 
Version 3 of the MBB-80. Ihe GOerecCtecimciitudiagqran, for 


Version D, was acquired and testing resuned. 
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Des 2G subseguent calls for, Pacific Cyber/Metrixs 
perscnnel to confirm or question findings, it was learned 
that some special-purpose circuitry was connected to the 
ccmparators. This circuitry had been included for a special 
application design of the MBB-80 and was incorperated onto 
all beards currently being distributed. We were given the 
assurance of MBB-80 design perscnnel that this circuitry was 
in no way affecting the operation cf our Bubbl-Board and 
that we could verify this ty "grounding" pin 7 of all of the 
cCmparators. Temporary “grounding straps" were placed on 
all of the comparators to see 1f there was any affect on the 
Operation of the MBB-80. Subsequent attempts at executing 
DIAG80 were all successful. Pacific Cyber/Metrixs personnel 
were informed of our findings. As a result, the designers 
of the MBB-80 are currently ccnsidering the inclusion of a 
manual switch on future MEE-80 boards to allow the user to 
select or bypass the special-purpese circuitry. 

With DIAG80.ASM executing properly, Biiitial tescangeot 
meee MBB-30 was continued. Informaticn was written into and 
read from pages of each device to verify that the bubble 
devices were error free. Additionally, information was 
Written into the devices and fewer removed from the MBB-80. 


The MBB-80 was left for a 24-hour period and then data 
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retention was verified in e€ach cubble device by reading back 
the previously stored information. Operation of the MBB-80 
Was Satisfactory and the lcw-level read, write, controller 
initialization and device initialization routines had been 
meratied to function correctly. 

With initial MBB~-80 interfacing and testing successfully 
completed and the low-level routines verified, advanced 
implementation and téesting with the ISBC 86/12A was begun. 
The low-level routines were available for direct translation 
into Intel 8086 assembly language and the DIAG80.ASM programa 
available as a model for future program construction. 

B. USE OF THE CP/M~80 MBB~80 DIAGNOSTIC PROGRAM 

The CP/M-80 diagnostic program, DIAG80.ASM, was designed 
and written for the fpurrfose of testing the hardware 
interface between the MBB-80 and the INTELLEC DD MDS systen. 
This program provides low-level routines which allow the 
user to verify correct write and read operaticns te and fron 
the MBB~-80. Although not originally intended tc serve as 
such, DIAG80 can alse serve as a low-level debugging tool to 
aid in systems program development. 

DIAG80 is executed by executing the DIAG8O0.COM file 
located on the CP/M-80 system disk. Execution wiil cause 


SmeweBB-80 ccntroller and all eight (8) magnetic bubble 





devices to be initialized in accordance with Reference 17. 
The MBB-80 controller base (defined in DIAG80 by a constant) 
must be set to O4¥O000H utilizing the address selection 
Switches on the MBB-80. The program will then, at the 
discretion of the user, cause an é€ighteen (18) byte page +o 
be either written into cr read from one of the eight 
(8)magnetic bubble devices. 

The user has the option of entering an "R" for a read, a 
meeetec guilt or a "W" or any other character for a write. If 
the user-specified operation is to read a page, the user 
will be prompted for the single-digit bubble device number 
(O-7H) and the three-digit page number (000-2808) of the 
page to be read. The contents cf the specified page will be 
printed to the CRT aiong with the contents of the status 
register. If the specified operation is to write an 
@ighteen (18) byte page, the user will be prompted for the 
two-digit hexadecimal value to ke written in addition to the 
bubble device and page number of the destinaticn. The 
two-digit value given by the user will then be written into 
all eighteen (18) bytes of the specified page. If the user 
types a "*Q", to guit, then the program terminates anda 
return is made to the CF/M operating system. NO error 


checks are made to verify correct entries by the user. 13 


61 





input values ara outside the specified tanges the progran 
Meamieonot function reliably. 
C. INTEL 8086 INTERFACE CCNSIDERATIONS 

The actual interface and implementation of the bubble 
memory system were accomplished utilizing CP/M-86 and the 
SEC 86/12A Single-beard computer. Several local 
modifications had to be made to the standard Intel 1i1S8C 
Boyi2s distribution board. The following description is 
previded to allow the verification of a correct board 
configuration when either duplicating this thesis work or 
continuing research on this systen. 

The address select pins for the i1SBC 86/12A sere 
configured to place +he computer's on-board RAM in the 
lowest 64K byt2 segment. Therefore, address select switches 
one (1) and eight (8) are "on"; all cthers are "cff". The 
following pairs of pins were ccnnected together (jumpered) 
+o provide the neéecessary interface te the liccally modified 
Intellec DD MDS system: s-4, 5-5, 08-76, 79-83, 87-89, 
er 3 » 127-128 and 143-144. The above iSBC 86/12A 
modifications are necessary fer the ccrrect operation of the 
SEC 86/12A within the Intellec DD MDS system and are not 


necessitated Ey MBB-80 Bubcl-Beoard reguiremencs. 
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Mice toey AcCGulsit.on CiECULtSy Of the iSBC 86/12A will 
reference RAM on the iSEBC 86/12A beard for addresses 0-64K 
and onboard EPROM for addresses OFFCOOQ-OFFFFF (hexadecimal). 
Any memory reference outside these two ranges will activate 
fone MULTIBUS acquisition circuitry. Conseguently, bus 
override commands, or inhibit signals, issued over the 
MOLTIBUS within the first 64K byte segment will have no 
merrect On the iSBC 86/12A‘s RAM. This requires that the 
MBE-80's controller base be placed at an address outside of 
the first 64K bytes. Since the MBB=-80 controller utilizes 
memcry-~mapped I/O to sixteen (16) consecutive memory 
lecations, any 16 addresses that can be inhibited, will 
S lic a aloe—- wm It was decided to provide the user with the 
ability +9 specify a segment base address for the MBB-80 
centreller in all of the CPyM-86 diagnostic (low-level 
interface) programs. Since the MEB-80 can decode 20 address 
lines, the controller's tase address space can be placed 
anywhere within the 1M byte address space that isn't 
eccupied by RAM or BEROM (which cannet be inhibited). The 
address specified to these programs must correspond to the 
address set on the MBE-80 address seléct switch. 

In additicn to the MEB-80 ccntroller mnemory address 


Meesgnmen=, the interrupt structure also has an affect on 
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the iSBC 86/12A configuration. The MBB-80 has two modes of 
operation: single-page mcde and multi-page acde. The 
Single-page mode, which reguires no interrupts and was 
implemented successfully on the Intel 8080, also poses no 
preblem for the Intel 8086. The multi-page mode, however, 
reguires that specific timing requirements be met by the 
host computer in cecmmunicating with the MBB-80 ccntroller. 
During transfers of data, the host must respond to the 
interrupts generated by tne MBB-80 every 160 microseconds 
(signaliing a completed transfer of one byte in a multi-by<e 
transfer). These interrupts can be either generated over 
the MULTIBUS as "hard" interrupts to the iSBC 86/12A or the 
1SEC 86/12A can “poll" (read) the status register that is 
within the address space of the MEB-80 ccntrcller. A 
detailed description of singlée-page mode, multi-page mode 
and the required interrupts is given in Reference 17. 

It was decided that the Intel 8086 implementation would 
be accomplished in steps. First, a simple, single-page mode 
pregram would be written utilizing the algorithms that were 
tested in the [Intel 8080 implementation. Since the 
multi-page mode provides approximately four (4) times the 
effective transfer rate of single-page node (45 Kbits/sec 


versus 11 Kbitsyséc), it was deémed essential to utilize the 
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multi-page mode of cperaticn in the final operating systen 
interface. This required a decision on the methed of 
detecting and servicing interrupts, which led to the 
development of a multi-page mode program that could operate 
in the "polling" mede or use interrupts generated over the 
MOLTIBUS. To handle interrupts over the MULTIBUS, an 
additional modification was made to the 1SBC 86/12A board: 
pins 72 and 80 were jumpered tc allecw IR1 (interrupt one) on 
*he MULTIBUS to be processed as interrupt type 16 within the 
iLSEC 86/12A micrccomputer via the cn-board 18259 
PEedrammable interrupt ccntrcller (PIC). It was also 
necessary to connect the IR1 interrupt on the MBB-80 board 
itself, as described on page 2-3 c£ Reference 17, which 
causes MBB-80 generated interrupts to be sent over the 
SGLTLBUS on IR1. Along with the modifications toc the 
Intellec DD MDS power supply and to the MBE-80 board 
Setatied in Section A cf this chapter, all hardware 
interface requirements have now been described. 
D. INTEL 8086 IMPLEMENTATION 

The implementation of the MEE-80 Bubbl-Eoard with the 
Intel 8086 was divided into two phasés, with each phase 
having SHecitac  gcals:. The first phase was the 


implementation of a progtranz which uses the single-page node 
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@e, operation on the MBB-80, where the casic routines 
develcped in the 8080 implementation would be utilized. The 
goal cf this rfhase was to verify the successful operation of 
the MBB-80 with the iSBC 86/1ZA hardware using the CP/M-86 
operating system. The second phase involved the 
implementation of a program which uses the multi-page node 
Memorperation utilizing either the polling mode or interrupts 
generated over the MULTIS0°S. The gcals of this phase were: 
(1) verify that the multi-page mode of operation works; (2) 
determine which interrupt method is most desirable; and, (3) 
prepare and test software routines that can be utilized in 
the final operating system interface. 

The singlé-page mode pregran, hereafter referred to as 
DIAG86S, was designed as a ccmplete Intel 8086 assembly 
language diagnostic program for the MBB-80, requiring little 
Operator intervention (as cpposed to DIAG8O.ASM -- the 8080 
version). The program will ccntinuously test every byte in 
each magnetic bubble device, recording all errors, until 


execution is terminated by the user. Three basic functions 


(D 
t4 


ct 


were to be tested: (1) initializing the MBB-80; (2); reading 
meemetne MBB-80; and, (3) writing to the MBB-80. 


The algorithms developed in DIAG8O for initializing the 


MeeecO controller and for reading and writing a physical 
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bukktle¢ page (18 bytes) were net logically altered. A direct 
translation of these routines was made from 8080 assembly 
language to 8086 assembly language. 

It was considered desirable te utilize the Intel 8086's 
segmentation features to allow the future use of the full 1M 
byte address space available 2h the PLOCESSOL. 
Conseguently, the simple "€080 nemory nodel" was rejected in 
faver of the "compact memory model" which utilizes multiple, 


user-controlled segments (see Reference 21, pages 7-9, for a 


complete description of these models). Code segments (CS) 
and data seqments (DS) are used only for codé and data 
respectively, while the extra segment (ES) is used to 


address the MBB-80 controller ports at a user-défined base 
address (see Reference 22 for a description of ASM86 and 
segments). 

DIAG86S was written and tested. During debugging, 
routine code and legic érrors wéeré encountered but no 


preklems relevant to this specific implementation were 


Ss 
+2 


iscovered. Emecucton cf this program on the iSEC 86/124, 
under the CP/M-86 operating system, achieved all of the 
Stated goais for this phase of the 8086 implementation. A 


complete listing of DIAG86S.A86 is contained in Appendix B. 
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The multi-page mcd2 prcgram, hereafter referred to as 
DIAG86M, is 2 diagnostic pregram that performs the same 
functional diagnostic tests as DIAG86S. In meeting the 
stated goals of this phase in the Intel 80386 implementation, 
several important issues were addressed. PiLrste, the 
pregramming cf suitable interrupt handling nechanisms to 
service both MOULTIBUS and polled interrupts from the MBB-80 
was necessary. Second, a meéethed for evaluating the 
desirability cf these methcds was needed. rene lin, = tne 
routines that perfcrmed specific bubble memory functions had 
*o be in a form suitable fer direct application in the next 
step of this thesis, the implementation of the interface to 
the CE/M-86 operating svsten. 

The two methods of handling interrupts are previded by a 
conditional assembly variable in DIAG8&6M. The boolean 
status of this variable (documented in the code) determines 
whether code is generated for a MULTIBUS interrurt or for 
the polled mode of cperaticn. Fos the © NULTISUS interrupt 
(ln addition to the above mentioned hardware noditfications) 
three steps are required: (1) set up the interrupt vector 
=n CP/M-86 low memory <tc handle the IR1 signal from the 
me LeEUS; (2) program a trap handler at this interrupt 


MeeerOr; and, (3) programming the 18259 PIC tc reccgnize and 
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Mmecterny interpret the interrupt coming in over IR1. A 
siaple semaphore, set by the trap handler and interrogated 
by the bubbl2 routines, is werlized = tor signify the 
occurrence of an interrupt from the MBB-80. The use of the 
polled mode merely requires the interrogaticn of the 
interrupt flag register at port offset OFH in the bubble 
memery contrcllier. 

Beth the interrupt scde and the polled mode were 
successfully implemented. Execution times for complete 
diagnestic runs were 47 seccnds for beth methcds (timed with 
a conventional stopwatch). Due to the extra code and 
hardware modifications required for vector initialization, 
the decision was made to utilize the polled mode in the 
CPy/M-86 operating system interface. Although this approach 
hemts a future applicaticn with multiple processes 
Met cing pricrity interrupts, this approach is consistent 
Meron the polled interrupt structure utilized by disk systems 
mimac are generated and distributed with the CE/M-86 
overating systen by Digital Research. It should be noted 
that the code and hardware mcdifications for the use of 
interrupt vectors included in this chapter are completely 
ine. i.cnal £60 future applications that require a 


prioritized interrupt structure using the MBB-80. 


69 





The bubble memory initialization routine uséd in DIAG86M 
is in the same form as that used in DIAGS86S. However, the 
read and write routines used in DIAG80 and DIAG86S are based 
on using a physical, magnetic bubble memory, page number as 
an addressable unit for each transfer. Therefore, the 
foundation for the memcry organization of the MBB-80 was 
develcped which would be ccmpatible with that expected by a 
meym disk structure. DIAGS6M views the transfer as that of 
a legical CP/M sector of 128 bytes. Since a physical bubble 
page is 18 bytes and 128 is not an even multiple cf 18, the 
last sixteen bytes of each logical bubble "sector" (144 
bytes) will be iaqnored (wasted). KR Logical  CP/H sector 
consists of 8 bubble pages cf which the last 16 bytes on the 
last page of a bubble "sector" are not used. There are 640 
bukble pages per device (chip), so there are 80 lcgical CF/M 
secters (as well as 80 burkble “sectors") on €ach bubble 
device. The access of data on the Bubbl-Board ncw requires 


only a device number (0-7) anda "sector" aumber (1-80) on 


that device. A routine tc convert a "sector" number to a 
starting page number of an eight page "block" was written 
and tested. Witsoe ine  sakeceeIhtc account the fact that 


the multi-page mode requires a "skew" factor of 322 on each 


cconsecutive bubble page access. This skew factor allows the 
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rapid access of pages without making complete shifts of ite 
majcr loops in the magnetic bubble devices. Mathematically, 
+he starting page number is computed as follows: 

SPN = ({ (SN-1) * 12 ) nod 641 
Starting rage number (0-640) 


MBB-80 "sector" number (1-78) 
modulo division (remainder) 


where SPN 
SN 


nod 
A ccomplete description cf this "skewing" operation and the 
necessary programming consideretions is provided on page 
3-13 of Reference 17. 

DIAG86M was written, tested and debugged in both the 
interrupt mode and the polled mode of operation. Execution 
Meeethias proegram on the iSBC §86/12A, under the CP/M-36 
operating system, achieved all of the stated goals for this 
phase of the implementation. A complete program listing of 
DIAG86M.A86 is found in Apfendix C. 

E. USE OF CP/M~-86 MBB~80 CIAGNCSTIC FROGRAMS 

DIAG86S.A86 is a single-page node, 8086 assembly 
language diagnostic program for the MBB-80. Its curpose was 
to verify the correct operation of the MBB-80 under CP/M-86 
Memeeoet Can ce used as a f£unctional diagnestic progran. 
Since it operates in single-page mode, no supporting 
interrupt structure is necessary for execution of this 


prcegran. 
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This diagnostic is invoked by executing the CIAG86S.CMD 
file on the CP/M-86 system disk. The program will print 
appropriate messages and then request that the user key in a 
four (4) digit; segment base address fer the MBB-80 
contrcller. Only four digits can be keyed in, followed by a 
Merriage return. Keying in more than or less than four 
digits, or invalid hex digits (viz., not in the range O-F), 
Will cause the printing cf an error message and the user 
will then be asked to re-enter the segment base address. 
This segment base address consists of the hign order 16 bits 
of the 20-bit address that is physically set on the MBB-80's 
address select pins. The address keyed in must match the 
MBE-80's address and the MBB-80 must be plugged into the 
INTELLEC DD MDS system With the power-protect switch 
enabled. Selection of a base address must fcllow the 
Setertaints as specified in Section C of this charter. {ri 
theses procedures are not followed, the program will not 
execute reliably (the program has no vay of knewing where 
the MBB-80 cecntroller nas been physicaliy placed in the 
mmomess Space or if it is correctly power2d up). 

The program will then tegin the testing of every byte on 
Mie nes-80 board. Fach device will be tested, in turn, by 


Writing and then reading back a random pattern (byte) one 
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page at a time. As each device is finished, a message so 
Mmorcating will be printed. Once all devices on the board 
have been tested, a summary of errors (if any) for that pass 
will be listed and testing will automatically continue. 
When the user wishes to discontinue testing, the keying in 
of any character followed by aeeCatGiage™ Leturn *) will 
terminate testing at the completicn of the current pass. 
Any errors encountered will be listed, indicating the bubble 
device number (0-7 hex), the bubble page number (000-280 
hex), the byte number within the page (OQ-11 hex), the 
pattern written and the pattern read back (in error). The 
occurrence of an arror does net halt testing. Testing is 
continuous until the user halts execution by conscle inpuéc. 
When the program is halted, control automatically returns to 
the CE/M-86 operating systen. 

DIAG86M.A86 is a multi-page node, 8086 assembly 
language, diagnostic cregram for the MBB-80. Its purpose is 
#¢ provide a production versicn of a diagnecstic progranm 
Which runs under CE/M-86 and which can also te used to 
verify the correct operation of an MBB-80 Burbl-Board. 
DIAG86M is Functionally eguivalent to DIAG&6S.Ad6, except 
that DIAG80 runs in multi-page mode and «hus, executes 


approximately four times faster than DIAG86S. 
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This diagnostic is invcked by executing the DIAG86M.CMD 
file on the CP/M-86 system disk. This program presents the 
Same messages as DIAG86S and all instructions relevant to 
DIAG86S apply to DIAG86M. 

There are, however, some special notes regarding the 
execution of DIAG86M. As explained in Section D of this 
chapter, there are two pessible versions of this proegran, 
differentiated by a conditional assembly switch. One 
version uses interrupts generated over the MULTIBUS, while 
the other uses ¢he polled mcde which interrogates the status 
Bee the MBB-80 controller. The "sign on" message will 
indicate which version is running. Since the polled mode of 
Operation is used in the final CP/M-86 interface, this 
versicn is found on the system disk. The MULTIBUS vectored 
interrupt versicn reguires that the hardware modifications 
te the MBB-80 board's interrupt pins and the iSEC 86/12A's 
interrupt pins be made (as described in Section C of this 
chapter) before program execution begins. 

DIAG86M.CMD Ls tne primary ~eQus 2Cr per forming 
diagnostic testing of MBB-&0 Bubbl-Boards. It alse provides 
a method of performing acceptance tests Or Newly purchased 
Mee-o0 Bubbl-Eoards. The user-specified base address for 
the controller allows the testing of any MBB-80 that is 


Mmeeently plugged into the INTELL&C DD MDS systen. 
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VI. CP/8~-86 INTERFACE TUPLEMENTATION 


A. BUBBLE DEVICE STORAGE O&KGANIZATION 

The CP/M-86 interface design consists of two farts: (1) 
the implementation of the MEBB-80 such that it will be 
functionaliy eguivalent to a floppv disk generated for the 
CE/M-86 operating system; and, (2) the generation cf a basic 
input/output system (BIOS) for the CP/M-&6 operating systen 
to include any combinaticn cf disks and MBB-80 Buktl-Boards. 
This section will descrite how the MBB-80 Pubbli-Board 
logical inzterfac2 1s made *c appear as a "standard" disk to 
+he CP/M-86 operating systen. 

CP/M-86, as does any CP/M system, uses two parameters 
When communicating with disk devices: tracks and sectors. 
The MBB-80 uses two different parameters; vages and devices. 
Mae translaticn of the 18 Lyte, physical, Dubble page to 
that cf a 128 byte CE/M sector was described in Section D of 
Meester V. This organizaticn configured the MBB-80 as 
consisting of eight devices (0-7), ¢ach with 80 "sectors" 
reece) of 128 bytes/sector. The remaining problem is that 
Of mapping a CP/M track and sector tc a corresponding MBB-80 


d¢vice number and an MBB-80 "tsectcr"™ number. 
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The BIOS in CP/M-86 has provisions for declaring the 
numter of sectors per track on a given disk, as well as the 
total capacity of that disk (which implicitly implies the 
number of tracks). It was decided that each MBB-80 "track" 
would consist of 26 sectcrs, which is equivalent to the 
nugber OL sectors per track of a CP/M-formatted 
Single-density disk. This guaranteed compatible, a Ot 
optimal, use of the built-in CP/M blocking routines which 
are designed for tracks that have Z6 sectors (or multiples 
me cGecf). 

Addressing each of the éight devices on the MBB-80 
Bubbl-Board requires additional software in that each 
individual device must ke separately addressed when 
accessed. Therefore, any logical storage organization that 
Caused the overlapping cf logical storage units from one 
physical device to the next would have required additional 
software and, cnus, incur a performance degradation. 
Conseguently, it was decided that any given MBB-80 "track" 
would be entirely ccntained on cne device. Since there are 
26 CE/M-86 Sectors per track on a single-density disk and 30 
Meeecors” On an MBB-80 device, there are 3 "tracks" per 
device with 2 "sectors" net used (wasted) cn each device. 


Since ther2 are 8 devices on an MEB-80 board, ene Ota L 
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capacity of the MBB-80 used would be 78K bytes on 24 
t+racks" with a total of 148K bytes net used (wasted). Ties 
firal storage organizaticn is shown in Figure 6.1. 

A method for mapping to this logicai organizaticn from a 
CP/M-86 sectcr call cr track call was needed. the track 
matping was the simplest. Mathematically, the device number 
is computed as follows: 


DN = IN div 3 


where DN = MBB-80 device number (0-7) 
TN = CP/M-86 track number requested | 
div = integer division (disregard remainder) 


For reasons of efficiency, this translation was implemented 
with tables rather than with arithmetic computations at the 
assembly language level. 

The sector mapping, however, presents a mcre complex 
preblen. roe cafuepemseen. 1p Figure 6.1, bubble "sector" 
numbers range from 1-80 contiguously, across three "tracks", 
On e€ach MBB-80 device. CP/M-86 uses a range cf sector 
numbers between 1 and 26 on each track for a single-density 


d 


jute 


ek. Given a requested CP/M-86 sector and track number, 
mien CcOrtssponding MBB-80 “sector" numpexz is computed. 
Mathematically, the “sector” number is computed as follows: 


SN = (26 * (TN mod 3)) + SEC 


where SN = MBB-80 "Séctor™ number (1-78) 
TN = CP/M-86 track number Bequesred 
mod = modulo divisicn (remainder) 

SEC = CP/M=-86 Sector number requested 
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Again, for reasons o£ efficiency, ths translateon «was 
implemented via tables rather than computed with the 
assembly language. The term "(26 * (TN mod 3))" is derived 
in the table lcokup at the same time that the CPyM-86 track 
is kteing translated +o a bubble device number. 

Given an MBB~-80 "sectcr” number (1-78), the physical, 
Starting bubble ovoagée number can be computed (this routine 
was developed during and is explained in the Section D of 
Chapter V). For convenience, the formula for computing the 
physical, starting page numker is repeated here: 

SPN = ( (SN-1) * 12.) mod 641 
where SPN Starting page number (0-640) 


SN. = @MBB-s0 "“"scctor" muaber ee 78) 
mod = moduio division (rémainder) 


The computation of the physical, starting page number was 
implemented with arithmetic statements and repetitive 
structures in the assembly language. 
B. CE/M-86 BIOS CONSIDERATIONS 
vv. tructured Standards for the BIOS 

The CE/M-86 operating system, aS written Ly Digital 
Research, centains ‘three parts: the Censole Ccmmand 
Precessor (CCP), the Basic Disk Operating System (BDOS) and 
the user-configurable Basic I/O System (BIOS). ie ce > and 
Mees FOrtions of CP/M-86 occupy apprcxinateliy 10K bytes and 


are distributed as a single hexadecimal code file (CPM.dH86). 
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The CCP and BDOS communicate with physical devices viaa 
mew—defined interface in the BIOS. This interface is a set 
of call and return parameter conventions for the specific 
functions used when the CCP and BDOS communicate with the 
macs. The BIOS contains all device-dependent code. A 


complete specificaticn cf the functional operation of the 


cé 


CCE and BDOS, along with he description of the BIOS 
interface, is contained in the CP/M-86 System Reference 
Guide (Reference 21). This section will describe the 
approach used in structuring a customized BIOS which 
prcevides an interface to both conventional CP/M-86 
peripherals and the MBB-80 magnetic bubble device. 

CP/M-86, as distributed by Digital Research, contains a 
Sample, skeletal BIOS which can be utilized by a user to 
Semergqure a customized BIOS. This skeletal BIOS is written 
in 8086 assembly language. A primary goal of this 
implementation is to provide a BIOS that can te easily 
modified and maintained. It was therefore considered 
Seeential to 6«6©ddevelop a BICS that consisted of structured, 
memmedtly ~unctional subroutines, within the constraints of 
the CP/M-86 physical comronent interface requirements. ied 
was also considered nécessary 12, provide adequate 


Seemmentation within the vregram code. all subroutine input 
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and output parameters must be clearly defined. All modules 
mat call a subreutine are listed in that called 
sukroutine's documentation (in the code). The use of 
external branches out of a subrcutine is not allowed and all 
sukroutines terminate with a single "return" (viz., no 
subroutine is allowed to "fall through" to another section 
of cede during execution). Naming conventions FOr 
constants, variables, labels and Subroutines are consistent 
and meaningful and all idéntifiers are located in 
alphabetical ecrder in logically-rslated secticns for ease of 
mecation. 

Although the above rules may result in some 
less-than-optimal execution structures from the viewpoint of 
speed, maintainability and ease of modification are 
essential goals. The primary purpose of this implementation 
of a BIOS, to provide a useable magnetic bubble system, can 
cnly be fully realized in a system that will allcw for the 
custom modification of the iaplemented hardware and the 
Supforting softwars. 

fee OC LUuctured "Approach to the BIOS 

The CCP and sDOS pcecrticns of CP/M=-86 are designed to 
Mieerace With disks. EVelcall,], an inaplementation of a 


Sieetsic disk unit, with a microcomputer running under 
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mey7n-&6, involves only cne kind of physical disk unit. 
This, cf course, results in the simplest BIOS. However, the 
Mer end BDOS, in interacting with the BIOS via a standard 
interface, have a logical structure which will allow almost 
any combination of physical devices to be implemented in the 
Peecs. The only reguirement is that the BIOS preserve the 
standard interface to the rest of CP/M-86. i. Ss ths 
structural characteristic of the CP/M-86 operating system 
that was found to be very useful in this implementation. 

The interface between the porticns of CPyM-86 that ars 
relevant to this implementation concern the "logical disk" 
interface. The CCP and BDOS are “aware” of up to 16 logical 
disks, which CP/M-86 will address via the parameters disk 
number, track and sector. It is this interface which must 
be preserved by any CP/M- 86 BIOS implementation. 
Additionally, this BIOS must support the combination of 
Standard floppy disk devices and MBB-80 Bukkl-Boards. 
Consequently, a structured approach is used within the BIOS 
itself for this implementation. 

The BIOS is logically divided into rour different areas: 
(1) standard CP/M-86 interface jump vectors; (2) subroutines 
Which support communication with specific devices; (3) 


eables which define the ohysical Characteristics and 
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ene guration of the "disks"; and, (4) subroutines which 
operate (withcut modification) on these tables (even though 
+he tables may be changed). 

This approach provides a takle-driven BIOS. AOS Of 
this structure can be easily altered and allcws for ease of 
Menmrtiguration modification. Subroutines that provide 
epecific device communicaticns (viz., initializaticn, read a 
sectcr or write a sector) must be written icr each type of 

sevice supported in the BIOS (a type is a specific 
dcuktle-density disk, hard disk, M2B-80, etc.). Tables are 
coded which describe the physical specifications of each 
logical CP/M-86 disk (viz., numkexr of sectors, directories, 
mpecitcy, 2tc.). Tables are alse coded to provide the 
necessary informaticn tc suppert the mapping of logical 
CP/M-86 disk numbers to the reguired physical parameters for 
@ particular type cf device (viz., oase addresses and 
internal disk numbers). These tables are fully described in 
Seet.cn D of this chapter. 

Finally, the ainclusicn cf all configuration-dependent 
MmeerMation in the tables allows for ease of modification. 
Previded that no new device types are generated (which would 
reguire device-specific routines), the configuraticn (number 


and types of disks) can be changed entirely within the 
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tables without modifying the BIOS code itself. These tables 
are ‘tincluded" into the EIOS code during assembly. A 
complete description of the BIOS generation will also be 
given in Section D of this chapter. All code in the BIOS 
which requires device-dependent information to perform its 
task will be designed to cperate directly on the tables. 
This provides for a very modular implementation. 
3. Jump Vector Interfaces 

Entry to the BIOS from the CCP and BDCS is through a 

jump vector. The jump vector is a seguence of 21 three-byte 


meme instructions which transfer program contrcl to the 


individual BICS entry points (subroutines). Jump vector 
elements ar? in a standard order reguired by CP/M-&6. Each 
BICS entry pcint corresponds to a specific function, or 


task, +o be performed by the BIOS for the CCP and BDOS. 
Each function has specific interface parameters (passed in 
designated registers) which must be adhered to in any BIOS 
itplementation. All of these jump vectors, che BIOS entry 
points and their asscciated parameters are given on pages 
96-64 of Reference 21. 

Many of the fuNCceLens =e the BLOS need not be 
implemented and are simply coded as a "return" (i.e., the 


LISTOUT jump vector). Other functions deal with table "look 
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ups" within the BIOS on behalf of the CCP and BDCS. This 
section will be concerned with the jump vectors that require 
tknowledge" of specific physical disk devices. A complete 
description of the CP/M-86 jump vectors is found on pages 
59-61 of Reference 21. 

wae “INET jump vectcr's function is to perform all 
Bmetialization necessary for CP/M-86 tha was not 
accomplished in the BOCT KOM cr LCADER procedurés. The 
"TNIT" jump vector must be modified to perfcrm all device 
initialization necessary. In this implementaticn, device 
metialization consists cf calling a Subroutine that 
Performs initialization for all of the 4&4BB-80 BukEbl-Boards 
that are logically and physically part of the systen. 
Additionally, the default CMA address (20-bit, segment and 
offset) must be converted and stored as a 16-cit address for 
all devices that require a 16-bit address (viz., the iSBC 
meeeeaisk controller). 

mie jump vector called “SELUSK" has the function cf 
selecting a disk for the next read cr write. The 2vOS Teas 
parameter is a logical disk number and the return paraneter 
1s the disk parameter header (DFH) fer that device. The DPH 
is a standard table within CP/M-86 (BIOS) which describes 


the physical attributes of each disk and will be described 






meesectaon D of this chapter. These basic functions were 
net altered. Additionally, however, upon selection of a 
CE/M-86 logical disk number, 1t is necessary to perforn 
certain tasks. Given the logical disk number, atable is 
used to determine the type cf device to which this disk 
nurber corresponds. If the device is a floppy disk, a 
Mapping must be made to the physical disk number within the 
flcppy disk centroller (0-3 on the iSBC 202 doukle-density 
iek controller used in this implementation). If the device 
is an MBB-80, the base address for the memory-mapped I/0 
centreller must be obtained. "MSELDSK" must be modified to 
perfcrm these functions by subroutine calls and to store 
Meas informaticn for later use. 
The jump vector called "HOME" has the function cf moving 
a disk read head to its heme fesiticn (track 0). There is 
no heme position for the MBE-80 Bubbl-Board. Consequently, 
NHCME™" must check the device type and if it is an MBB-80, 
the heme request is translated into a request to set the 
track to zero (as required by CE/M-86). 


mee  sUMp vector called “SETTRK" has the function of 


Semcrang the track for the next read or write. The track 
nuakber is passed in as a parameter. CP N-8G supports tEack 
numbers in the range 0-65536. This allows the mapping of a 
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wide range of CP/M-86 track numbers directly tc physical 


Brack numbers Weer disk controllers (Viz., no 
translation). However, the MEB-80 storage organization 


requires the mapping of CF/M-86 track numbers to an MBB-80 
device number and toa "sector" cffset within that device. 
"“SFTTRK" must be modified to perform this function (by 
subroutine call) and to store this derived information for 
later use. 

The "READ" and "WRITE" jump vectors have the function of 
performing a sector read (cr write) tc (from) the specified 
disk number at the specified track and sector. Normally, 
these vectors overform the actual operation directly by 
passing a channel command werd to the disk ccentreller for a 
Single device. However, the MBE-80 reguires entirely 
different routines <+«tc perfcrm a read or write operation. 
Therefore, "READ" and "WRITE" must determine what type of 
device is currently being utilized and then call appropriate 
SukEroutines to perferm MEE-8C reads and writes. The 
routines «hat actually perform the non-standard device 
(viz., MBB-80) read and write operations must also perforn 
all necessary low-level mapfrings. In this implementation, 
the MBB-80 read and write subroutines will call cna sector 
translation subroutine that will map CP/M-86 sectcr numbers 


to MEE-80 "sector" numbers. 
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It should be noted that all device-specific details have 
been excluded from the jump vectors and coded within the 
device-specific subrcutines. Jump vectors merely determine 
what type of device is being used (via tables) and then call 
appropriate subroutines. Although this BIOS implementation 
is specifically for the iSBC 202 disk controller and the 
MBE-80 Bubbl-Board (as the two types of logical disks), it 
can be ¢asily modified to include any other type of disk 
device or magnetic bubble system as well. Operations that 
are dependent on a specific device type are isclated in 
specific subroutines. As described above, maintainability 
and ease of configuration modification have been designed 
inte the structure of this BIOS implementation for CP/M-86. 
C. USE OF THE CP/M-86 MBB-80 FCRMAT FROGRAMA 

MESOFMT.A86 is a multi-page mode, 8086 assembly language 
pregqram which formats the MBB-80 Bukbi-Board to meet IBM 
compatibility standards. This format is the required format 
mer "new" CP/M-86 disks and consists of the hex pattern "E5" 


LSKs The pregram uses the 


QQ. 


in every data byte of the 

Multi-page polled mode tc write the pattern to the MBB-80. 
This format program is inveked by executing the 

MBEQrMT.CMD file on the CE/M-86 system disk. The proqram 


Will print appropriate messages and then request that the 
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Meer key in a four-digit, segment base address for the 


MBE-80 controller. Only four digits should be keyed in, 
followed by a carriage return. Keying in more or less than 


mem: digits, or invalid hex digits (viz., not in the range 
O-F), will cause the printing of an error message and the 
user will then be asked to re-enter the segment hbase 
address. This segment base address consists of the high 
order 16 bits of the 20-bit address that is physically set 
on the MBB-80's address select pins. The address keyed in 
must match the MBB-80 centroller's segment base address and 
the MBB-80 must be plugged into the INTELLEC DD MDS systen 
with the power-protect switch enabled. Selection of a base 
address must follow the constraints as specified in Section 
mect Chapter V. If these procedures are not followed, the 
prcegram will not execute reliabiy (the program has no way of 
kKncwing where the MBB-80 contrclier has been physically 
placed in the memory address space or if it is correctly 
pewered up). 

The program will then Eegin writing the hex pattern to 
every byte on the MBB-89 board. No further cperator action 
1s required. Each dévice (0-7) wiil be written to and, as 
each device is formatted, a message so indicating wiil be 


Peenecd. Yoon program completion, the “formatting complete" 
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message wrt! be printed and control wili return to the 
CPy/M-86 operating systen. 

Since the polled mode is used to Lmuplement the 
multi~page mcde of operation, there are no special 
considerations for running this program. The user-specified 
base address for the contrcller allows the formatting of any 
MBE-80 Bubbi-Board ‘that is currently plugged into the 
INTELLEC DD MDS system. MESOFMT.CMD provides the only means 
of preparing an MBB-80 f#ubbi-Board for use asa "disk" 
within the CP/M-86 operating systen. 

D. CPE/M-86 BIOS ITBSPLEMENTATION 
1. Modification of the Existing BIOS 

The host CP/M-86 systen, as described in Reference 
ieee contains a customized BIOS supporting a single iSEBC 202 
tex controller. This host BIOS is used to génerate the 
LCADER BIOS as implemented in both the host system's BOOT 
feleeand LOADER progran. The nest BOOT ROM requires that a 
physical iSBC 202 disk be present in drive number 0 for boot 
me@erng (tcacks 0 and 1). However, ne restrictions exist as 
to the actual disk configuraticn that can be initialized and 
memecy CPM.SYS (in its BIOS), which is read into RAM by tne 


Leader progran. 
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The basic routines for console input and output 
eccntained in the BIOS cf Reference 18 were considered 
acceptable for use in this implementation. All cther jump 
vectors either required medifications as descriked in the 
preceding section or were not ccnsidered to be consistent 
with the structured standards of this implementation. 
Conseguently, all of the jump vectors were re-coded. 

The device-dependent recutines Supporting the iSBC 202, 
fcund in Reference 18, were aiso incompatible with the 
structured standards and goals of this implementation. 
There was much redundancy and inefficiency in the algorithms 
and in the implementation as reflected in the code. In 
addition, the indexing method for mapping error codes to 
errer messages for the iSEC 202 was found to be incorrect. 
Therefore, all routines relating to the iSBC 202 were 
Be-ewoaitten to perform correctly and to coincide with the 
Standards and structured appreach of this implementation. 
Obviously, the single iSBC 202 centroller implementation of 
Reterence 18 was limited to a Singie disk device. The 
implementation presented here is based on a takle-driven 
BICS that directly supports up tc sixteen (the CP/M-86 
Maximum) disk drives which can be cf two different types of 


devices. This necessitated the development of an entirely 
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new BIOS structure which resembles the BIOS cf Reference 18 
and the CP/M-86 distributicn BIOS only in its preservation 
of the required jump vector interface standards. 

2. Disk Parameter Table 

The tables whick determine the physical disk device 
characteristics of this CF/M-86 BIOS implementation are 
certained in two separate files. One filé contains the 
specific d2vice characteristics of each device, while the 
other file determines the currently generated configuration 
of disk devices. 

The family of standard CP/M operating systems is 
designed to accept a takle-driven specificaticn for the 
physical characteristics of each logical CP/M disk device. 
These tables are called "disk definition tables" and consist 
of a disk parameter table fcr each disk generated as well as 
the scratchpad work areas for the operating system. The 


user 1s able to specify the number cf logical disks to be 


generated (0-16), along with the characteristics of each 
disk (each having a separate entry). These characteristics 
m@eruce: «he logical disk number, rirst and last sector 


hRumber on each track, ofticnal skew factor, blocksize, disk 
Capacity, «he number of directory entries, checked entries 


and the naumber of tracks to reserve for the operating 
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system. These parameters are specified in a file. 
Nermally, the same type of device has the same parameters in 
every occurrence of that dévice type in the fiie. The only 
parameter that changes for devices of the same type is the 
legical disk number. 

This file, containing the disk parameters, is used as 
input to a CPE/M-86 utility program called GENDEF. This 
utility takes as input a file called filéename.DEF and 
preduces an 8086 assembly language scurce code file called 
filename.LIB. This output file contains the generated 
buffers, tables and scratch work areas needed by CP/M-86 to 
ccmmunicate with each disk device. A complete description 
of this disk parameter table generation and specification 
precedure is included on pages 65-73 cf Reference 21. 

The file generated by the GENDEF program is used in an 
ASM86 “include” statement (viz., inserted intc the BIOS 
code) to be assembled within the BIOS. The disk parameter 
definitions (to be input to GENDEF) used for. Ss 
tmplementacion are included in the file DKERM.DEF. This 
Memeni=icon allows for three "disks": mwO Lope mecUc LEOpoy 
disks and one MBB-80 "disk." If mere or less disks are 
Teguired, this disk parameter table must be changed and a 


new BIOS generated as described in a following section. 
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The disk definition parameters used inthe BIOS of 
Raference 18 for the iSBC 202 contrcller were used inthis 
implementation. The disk definition parameters used in this 
implementation for the MBB-80 were derived from the magnetic 
bukble storage organization scheme. First and last sector 
numbers were defined as 1 and 26, respectively. No skew 
eeenslation was specified in that the BICS MBB-80 
sector/track translation routines provide for this function. 
A tlocksize of 1024 was defined so as to resemble a 
Single-density disk. The capacity is 71K bytes as 
determined by the physical storage scheme and acccunting for 
reserved operating system tracks. Space was reserved for 32 
directory entries, which allocates the minimum space 
possible for the MBB-80 directory. A checked entry cf zero 
(9) 1s absolutely necessary to indicate that the MBB-80 is a 
non-removable media. Any directory checking will result in 
read-only status settings for the MBE-80 since CRC check-sun 
DYces are net provided for by the MBB-80 controller. 
Finally, two "tracks" are reserved for the operating systen. 
This will aid in the implementation of an MBEB-80 LOADER on 


meek 9 and track 1. 
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3. Disk Configuration Tables 


The DKPRM.DEF file contains information about the 
physical characteristics of each logical device. Since nore 
than one possible device type may be generated in this 
implementation, it is necessary to map the CP/M-86 logical 
device numbers and their associated physical characteristics 
+c the actual physical devices they represent. A set of 
*akles has been developed to accomplish this task and is 
Gontained in the file called CONFIG.DEF. This file is also 
an 8086 assembly language scurce code file which is included 
into the BIOS during assenbly. Phe configuration file is 
entirely a product of this implementation and has no 
relation to Digital Research's cCP/M-86 distribution BIOS 
code. A summary descripticn cf the CONFIG.DEF file entries 
Mem—ecenrcdined inthe CONFIG. DEF file itself. A complete 
discussion of the tables will be presented here. 

The first entry in the configuration file is the number 
of logical disks defined. Ene tdentistver Lame in the file 
is "num_log_disk" and this antry is an equate statement. 
The value of this label can be in the range 0-16 decimal but 
must correspond +o the "DISKS" statement in the DKPRM.DEF 


mele. 





The next entry is the device table. The identifier name 
mathe tile is "device table* and this table is a 0-16 byte, 
One-byte per éntry, table. This table describes the type of 
each disk device in logical order from CP/#4-86 disk number 
zero (0) to the highest CPyM-86 disk number generated (which 
mee “num log_disks" Minus 1). A byte position, Or 
displacement, in the takle corresponds to the logical 
CE/M-86 disk number (viz., byte offset 2 is the device type 
entry for CP/M~86 disk number 2, 1£ generated). Each 
logical CP/M-86 disk that is defined must have an entry in 
this table indicating its device type. Therefore, the size 
of this table, in bytes, wili equal the number cf CP/M-36 
disks defined. The different device types supported in this 
implementation each have a unique, hexadecimal, tFEyte valué 
to identify them. These codes are defined in equate 
Statements a* the beginning of the BIOS. The user wiil make 
entries into this table using the equate constants 
"disk_type" and "“‘mbb80_type", with each successive entry 
Separated by a comma. 

Fellowing the device table is the disk Logical tacle for 
MmeetobC 202 disk ccntrcller. The identifier name in the 
Beeeenis "DK logical table" and this table is a 0-16 byte, 


one-byte per entry, table. This table maps logical CP/%-86 
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disk numbers (0-15 possible) t¢o internal iSBC 202 disk 
contrcller numbers. Meecoagre orl 202 “eentrcllexr can 
address up tc four disks (internally numbered 0-3). A 
specific BIOS configuration may assign the four iSBC 202 
disks to any four CP/M-86 disk numbers in the range 0-15. 
These CP/M-36 disk numbers must be mapped to iSBC 202 disk 
centrclier numbers (0-3) to cre used in the disk channel 
command words. Therefore, this table maps logical CP/M-86 
disk numbers to iSBC 202 disks (up te to a maximum of four, 
Since this implementation is designed for a single iSBC 202 
ccntroller). The size of this table, in bytes, can be up to 
16 bytes, with the offset in the table corresponding to an 
ety for that CP/M-86 logical disk number. It is important 
tc note <tchat an entry must exist for ail positions in the 
takle up to and including the offset for the last CP/M-86 
disk generated as an iSBC 202 disk device. The value 
Senenull”, which is merely a “rlace holder", is used for ali 
Gentries which do not corresrond to iSEC 202 disk devices. 
For sxample, 1£ ctwo iSBC 202 disks were generated as 
logical CP/M-&6 disk numbers 0 and 4&4, then the table would 
be five bytes long. Byte offsets 0 and 4 would ccentain OOH 
and O1H (as internal disk numbers) respectively, while byte 


Meeeee=eS 1-3 would contain the “CPK_nuli" place holding entry. 
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Byte offsets greater than 4, the last iSBC 202 disk 
generated in this example CP/M-86, need not be defined 
(ccded). 

The last entry in the file is the MBB~80 logical table 
fer the MBB-80 controller(s). The identifier name in the 
meee 2s "MB logical_table" and this table :s a 0-16 word, 
one-werd ver entry, table. This table maps logical CP/M-86 
disk numbers (0-15 possible) to MBB-80 controller seqment 
tase addresses. Any number of M4BB-80 "disks" may be 
generated anywhere (non-seguentially and non-contiguously) 
in the logical CP/M-86 disx range of 0-15. The size of this 
table, in words, must be exactly eéqual to the number of 
disks defined ("num_log_ disks"). Lhe, Sword Off S tain the 
table corresponds to an é€ntry (ccntroller segment base 
muidmess) fOr that CP/M-86 MBB-80 "disk." It is lmportant to 
nete that an entry must exist for all positions in the 
tables. foe Valicmmis Hull’; which is aerely a "place 


helder", is used for all entries which do not correspond to 


an MBB-80 "disk" device. This table is also used to 
mipesalize the MBB-80 controller(s) based on the total 
number of CP/M-86 disks defined. The table is "walked 


through", with null entries being ignored and with non-null 


Semccclier Segment base addresses being PiettaLized. 
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Therefore, unlike the disk logical table, there must be one 
entry for every logical CPyM-86 disk defined. 

For example, if five CEF/M-86 disks were generated, with 
numbers 0, 1and 3 being iSBC 202 disks and numbers 2 and 4 
being MBB-80 “disks", this table weculd be five words in 
mergth. Word offsets 2 and 4 would contain valid MBB-80 
centrcller segment tase addresses (in hex), while word 
offse<s 0, 1 and 3 would centain the "MB nuli™ place holding 
entry. It is also important to note that when boct loading 
a CE/M-86 operating system with MBB-80 boards generated as 
disks, it is imperative that all MBB-80 boards te plugged 
inte the INTELLEC MDS chassis and powered up. Failure to do 
so will cause the BIOS initialization routine to "hang" when 
precessing the valid controller segment base addresses for 
mee=o0's in this table. 

4. BIOS Generation Precedure 

The procedure EOS the generation of a 
uséer-configured BIOS and a new CBP/M-86 operating system is 
described on pages 80-82 cf Reference 21. A synopsis of 
that procedure, along with the necessary nodifications for 
*his implementation, wili be presented here. 

The two files, DKPRM.DEF and CONF IG.DEF, are updated, as 


Specified above, to reflect the user's desired devices and 
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configurations. The CP/M-86 GENDEF utility program is run 
utilizing DKERM.DEF as input and producing DKPRM.LIB as 
Suteut. 

Assuming all necessary device-dependent modifications 
are made to the BIOS, assembly of the BIOS can take place. 
No modifications are necessary tc this implementation BIOS 
mem cnly isSsBc 202 disks and MBE-80 “disks", in some 
combination, are to re used. This implementation's BIOS is 
included in the file called MBBIOS.A860 and is listed in 
Appendix E. In the code file MBBIOS.A86, there are the 
appropriate ASM86 "include statements" fcr the files 
DKPRM.LIB and CONFIG.DEF which will cause them to be 
inserted into MBBIOS.A86 during assembly. It was found that 
the 8086 cross assembler, a CP/M-80 prograa, has a small 
symkel table capacity. Therefore, assembly of MBBIOS.A86 
Mest take place under CP/M-&6. 

Upon successful asseanbly, ate 22S FFB LOS. 196 “eS 
preduced. Ryis Tile’ eis concatenated tc the CP/M-86 
Meena bution CCP and 3D0S, contained in the file CPM.H86, 
using the CP/M-86 utility program called PIP.CMD. The name 
of the resulting combined file should be a dummy, temporary 
Name such as NEWCPM.H86. The resulting CCP, sBDOS and 


Miecemizead BLOS hex file is then cconverted to the CMD file 
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memmpat by executing the CP/H-86 utility program called 
GENCMD.CMD. The GENCMD octions of an 8080 memory model and 
an absolute code location cf "A440" must be specified. The 
fermat of the command with the options follows: 
GENCMD NEWCPM 8080 ccdef[A40 } 
Finally, the NEWCEM.CMD file is transferred to a new system 
disk that contains a LCADER program (ses Chapter VII) and 
menamed to CPM.SYS. Now the <tailcring process is complete 
and aboot load to the new system disk will invoke the 
CPy/YM-86 that has been generated. 
5. Reconfiguring the IOS 

This implementation has been designed to directly 
SUEFOIt a single iSe8c 202 disk ccntrolléer and aultipils 
MEE-80 boards in the BIOS. This allows for up to four (4) 
ficrpy disks and up to "n" (where "n" equals sixteen minus 
the number of iSBC 202 disks generated) MBB-80 disks. 

The number and types of iSBC 202 and MBB-80 disks can be 
altered via the device and configuration tables. No changes 
are necessary =O “his luplementation's BIOS code 
fuer tOS.A36). Polveweng. Che procedures Of Section D.4& of 
this chapter will generate a new configuration in accordance 
meen che information contained in the tables. Therefore, 


this siI0OS can be e¢asily expanded to suppert additional 
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MBE-80 "disks" and two more 1SBC 202 drives (Since the 1SBC 
Bee ccatroller is currently controlling only two physical 
drives). 

This implementation has been generated with three (3) 
logical CP/M-86 disks. CP/M-86 disk numbers 0 (drive A:) 
maoe2 (drive C:) map to the 1iSBC 202 controller's internal 
disk numbers 0 and 1. CP/M-86 disk number 1 (drive B:) gaps 
to an MBB-80 Bubbli-Board controller at a segment base 
address of Q8000H. A segment base address of C80Q00H was 
chosen for twe reasons: (1) CE/M-86 I/O reserved addresses 
in the first 64K segment cculd not be used because of the 
inability to inhibit the onboard RAM for memory-mapped I/O, 
and (2) OQO80000H is Significantly out of the address range 
for most applications. This address can be changed by 
mcdifying the entry in the CONPIG.DEF file for the MBB-80 
centrcller segment Ease address. 

E. EVALUATION OF THE IMPLEMENTATION 


1. Performance 





The primary criteria fer the performance evaluation 
of this implementation was the speed of executicn of the 
input/output functicns of the types of disk devices. Three 
different programs were run on broth an MBB-80 "disk" and on 


an iSBC 202 disk +o determine execution times. A 





conventional stopwatch was used for the timing and the 
results of those tests are summarized below. 

The first test consisted of executing the CP/M-86 
Meriity progran, called EFIP.CMD, which transfers CP/M-86 
files between disks. The PIP program and target files of 
2K, 6K and 28K bytes were loaded to both an MBE~-80 "disk" 
and an iSBC 202 disk. Transfer operations were performed on 
each file on each device utilizing same-device resident 
copies of PIP, the target file and the destination fils. 
The results of the test utilizing the PIP program were as 


follcws: 


File Size (Bytes) MBB-80 (Seconds) iSBC 202 (Séconds) 


6 K 6.1 Uae 
28K 18.2 ene 


The second test consisted of executing the CP/M-86 
utility program, called ED.CMD, which is an object-oriented 
editor for files. The ED program and target files of 2K, 6K 
anc 24K bytes were loaded to -ktoth an MBB-80 "disk" and an 
meme. 202 disk. Edit operations were performed on each file 
On @ach dévice using same-device resident copies of ED, the 
target file and the destination file. The events timed and 
tested for an edit cperation were the reading cf the ED 


prcgram into memory and the writing of the target file back 
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+o its source disk from RAM memory. 


editing test were as follows: 


File Size (Bytes) MBB-80 (Seconds) 


Read write 
2K 2.6 es 
6K Sieg Sent 

24K 3.4 10.4% 


The CLesults of the 


LSBC_202 (Seconds) 


Read write 
8.4 oe 
8.5 6.4 
8.7 13.9 


The last test consisted of executing the CP/M-86 utility 


Garrea  ASMS6.CMl, 


pregran, 


language files into 8086 hex files. 


target files of 4K, 8K and 14K bytes 


MBE-80 "disk" and an iSBC 202 disk. 


were performed on e€ach file cn 


same-device resident copies of ASM86 


aoa The 


mere ort the ASM86 output és. 


test were as follows: 


tle Size (Bytes) MBB-980 (Seconds) 


WK Ze. 9 
8K 45.0 
14K 64.3 
From these test results 1% can 
mee~380 Bask’ ows] prcvide an 


ApEroximately 42 


disk. Of course, 


greater the performance advantage that 


using an MBB-80 vice an iSEC 202 disk 
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which assembies 


percent in input/output 


the more I/O intensive 


80&6 assembly 
The ASM86 program and 
were loaded to both an 
Assembly cperations 
Weta Zong 


each device 


the target file and 


s 


results cf the assembly 


LSBC 202 (Seconds) 


23.4 

S36! 

81.9 
be computed that an 
average increase of 
over an iS5EC 202 
@€ pregram is, the 


can be realized when 





2. Limitations 

Three primary limitations were discovered in this 
igplementation: transportability, density and transfer 
rate. A certain measure cf transportability is provided in 
that any single MBB-80 Bubbl-Board is a logically complete 
CP/M-86 disk. The board can be removed from the INTELLEC DD 
MDS system chassis and noved tc another system that supports 
MBE-80 devices tinder CP/M-86. However, this dces reguire 
the "powering down" cf the chassis prior to removing the 
board. ie Ss eid lsom becogn zed that the media of a 
Meead=state circuit board is different frem that of a 
Mmeexaple, thin, nagnetic disk. It 1s not clear which nedia 
is more SOonduei ve <c traneportability in any given 
application and environment. 

The second limitation involves the relatively smail 
Gapacity of the MBB-80 “disk (78K bytes) in comparison to a 
Single-density or double-density floppy disk (250K or 500K 
bytes). Even if the full capacity of the MBB-80 (92K bytes) 
Bema be used, the capacity difference is significant. The 
Jigited capacity of the MBE-80 restricts the number and size 
of the applications which can ke executed entirely with the 
Mee-80 storage device. This limitation made large 
assemblies on “MBB-80's and MBE~80 cCP/M-86 resident disks 


Mmeeadecical tor a useful izmplementaticn. 
12 





The third limitation, transter rate, becomes évident in 
viewing the test results presented in the fperformance 
section. As the size of tne fiie is increased, the MBB-80's 
advantage over the iSBC 202 on I/O operations becomes less 
noticeable. This is primarily due to the fact that the 
MBB-80's transfer rate is only 45 Kbits/second, compared to 
a transfer rate of 250 Kbits/second fer the iSBC 202. When 
I/C is performed where the number of seeks is relatively 
small in comparison +to the number of actual bits 
transferred, the MBB-80's advantage is diminished. The 
validity of this trend could not be verified by the testing 
of large files because of the capacity limitation cited 
abcve. 

I* should be noted that, upon the availakility of 
multiple MBB-80 boards, a system can be easily generated to 
SUEPPOrt many MBB-80 "disks." Then, large applications could 
Semrun exclusively cn MBE&-80 "disks" by utilizing target 
disk specification parameters that are available in most 
CP/M-86 utility programs. madieeonally, the future 
generaticn of a BICS utilizircg the currently available, 
high-capacity (1M byte) magnetic bubble devices is not to be 
precluded. This implementation of a BIOS provides an 
excellent and 2asily adapted framework for the addition of 


new types of disk devices. 
106 





So. applications 


This implementation of an MBE-80 Subbl-Board within 
the CP/M-86 operating system has prceduced a workaple host 
micrccomputer envirenment which can te used for research and 
evaluation of magnetic bubble nemory technology. It has 
alse produced, with the subseguent addition of mcre MBB-80 
boards, a developmental system which offers significant 
performance (speed of I/0) improvements over standard floppy 
Meeks in certain applicaticns. 

There is much theoretical research on the applicability 
of magnetic devices. The literature contains many untested 
and unimplemented designs, algcrithms and programs for 
applications ranging fron "fast sorts" to database 
Management schemes. This implementation provides a host 
system capable of supporting research and experimentation in 
these areas on a fully-cperaticnal microcomputer system that 
Supports magnetic bubble devices. 

This implementation has produced a system capable of 
Supporting up to sixteen MBB-80 "disks." Despite the 
individual capacity limit of 78K bytes per MBB-80, es 
Sev2ous that a significant reducticn in program development 
tine could be achieved utilizing exclusively MBB-80 logical 


easks," This system is buiit upon tne highly-regarded 
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Intel 8086, 16-bit microprocessor running under the CP/M-86 
operating system. These characteristics, combined with the 
demenstrated performance c£& the MBB-80, GOmerl pute to 
previde a robust host system for research and application 


pregram development utiiizing magnetic bubble devices. 
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VII. BOOTLOADING CP/M-86 FROM THE MEB-380 


A. BCOT ROM AND LOADER CONSIDERATIONS 

When installed in the iSBC 9836/12A, the BCOT KOM is pare 
of the memory address space, beginning at byte iocation 
OFFOOOH, and receives ccntrol when the system reset button 
is depressed. The BOCT 8OM cn the standard iSBC 86/12A 
cortains the 957 monitor program as supplied by Intel. The 
pregram implemented on the EFRCM chips was modified by 
adding code tc the end of che 957 zenitor pregram in memory 
addresses that were not utilized in the implementation of 
Reference 18. This customized addition of code to the 957 
mcnitcr program begins at memory address OFFD4OH and has the 
responsibility of reading the LOADER program from the first 
we system ‘tracks of the CP/M-86 defauit disk drive into 
Memory and then passing ccentrel tc the LOADER program for 
execution. 

The BOOT ROM is actuaily an EPROM which can be nodified 
Cr specific implementations. The host déveiopment systen, 
as described in Referencs 19, reads the LOADER program from 
tracks 0 and 1 on fhysical drive number 0 of the iSBC 202 
mentrcller. Uvoeaddieaenaal  EOCT “ROM code contains the 


Meteescaly routines for anitializging the iSBC 202 controller 
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and fer reading the LOADER program from disk into memory. 
This procedure is initiated by issuing a "GFFD4Y:0" command 
meme ne 957 monitor, which passes control to the beginning cf 
the beotstrap code in the BCOT ROM. 

It was considered desirable to be able to boct load the 
CPyM-86 operating system from either an iS8&C 202 disk or 
moem an MBB-80 logical "disk." This requires two entry 
points into the additional code in the BOOT ROM. These 
entry points will set a flag indicating whether an iSBC 202 
disk cr tha MBB-80 is to be used as the boot loading device. 
MPaditionally, routines for initializing the MBB-80 and for 
reading track 0 and track 1 on the MBB-80 had to ke included 
in the BOOT ROM. 

The available space in the BOOT ROM address space is 
severely limited. Therefcre, the cede for common functions 
in the BOOT ROM must be used ky both an iSBC 202 boot 
reguest and an MBB-80 bcot request when boot loading. Then, 
based on «he value cf the entry point flag, the requested 
Memee cyYDS (VizZ., iSBC 202 or MBa-80) initialization and 
Téead routines will be utilized to read into RAM the LOADER 
Pregram from tracks 0 and 1 0f the boot device. A common 
section of code will be used to pass control to the LOADER 


mecagram for execution. A primary consideration must be 









restricting the size cf this additicnal code to the unused 
space after the 957 moniter program in the iSEC 86/12A's 
Ombcard EPROM. 

The LOADER program 1s a Simple subset cf the CP/M-86 
operating system that contains sufficient file processing 
capability to read CPM.SYS intc memory from a system disk. 
When the LOADER program completes its operation, the CPM.SYS 
pregram receives control and proceeds to process operator 
input commands. The LOADER pregram consists of a loader CPM 
and a loader BDOS (distributed by Digital Research) along 
with a user-configured loader BIOS. The file resulting from 
the concatenaticn of these three modules is converted to an 
executabl2a CMD file and placed on tracks 0 andi of the 
Meecem disk. [Ref. 21: pp. 77-79] 

A user-configured lcader BIOS can be generated from the 
BIOS code developed in this implementation. The complete 
flexibility of device configuration that is possible ina 
Standard BIOS is also possible ina loader BIOS. This 
implies an important consideration: the LOADER program doés 
not have to read CPM.SYS from the same device that the 
LCADER program itself was read fron. The LOALCER progran 


Will read CPM.SYS from the default disk numbexr and its 


corresponding device tyre based upon the device 






configurations and mappings specified in the lcader BIOS. 
Issuing a monitor "GO" command for the entry point of the 
iSEC 202 in the BOOT ROM will always result in the contents 
of tracks 0 and 1 (the LOADER program) on physical 1SBC 202 
drive number 0 being read into RAM. Likewise, issuing a 
monitor "GO" command for the entry point of the MBB-80 in 
the BOOT ROM will always result in the contents of "tracks" 
O and 1 of the MBB-80 at a controller segment base address 
of O8000H being read into RAM. The actual device 
configuration contained in the loader BIOS is not restricted 
by the type of device used by the EOCT ROM when reading the 
LCACER program. 
B. BOOT ROM AND LOADER IMPLEMENTATION 

The additional code for the BOCT ROM was written and 
tested. It provided for a ccnditional pnoot load from an 
ISEC 202 or from an MBB-80 at a centroller segment base 
address of OQ8000H. The entry points are OFFD40OH for the 
iSEC 202 and OFFD44H for the MBB-80. Upon depressing the 
Meeet Dutton, the 957 moniter program begins execution. To 
Meet load from the iSBC 202 the menitcr command "GFFD4:0" is 
given, which is the same ccmumand as that used in the 
implementation of Reference 18. Toc boot load from the 


MBE-80, the menitor ccmmand “GFFD4:0004" is given. 
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The additional code for the BOOT ROM contains the entry 
Beants for «he twe device types, the ope 60/124 
enitialization procedures and the code necessary ee, 
initialize the selected kocot device and read the LOADER 
prcegram from the system tracks of that device. The 
maaqitional code for the BCCT ROM is contained in the file 
called wMBS80ROM.A86. This file is assembled and the 
resulting object code is added to the 957 monitor program on 
the iSBC 86/12A's onboard EPROM. This precedure is 
Meecriped in Section C of this chapter. 

The LOADER vrogram itself ccensists of three parts: the 
Beaq CPM program (LDCEM.dH86), the Loader Basic Disk 
Operating System (LDBDOS. 486) and the Loader Basic f[I/0 
System (LDBIOS.H86). The files LDCPM.H86 and LDBDCS.H86 are 
included as part of the Seangard Drgecal Research 
Meetrsputszon system for CP/M-86. ihesmsfcaader’ BLOS is 
generated from the file MEBIOS.A86, which is also used to 
generate the standard CP/M-86 2IOS for this implémentation. 
Mmteos.A86 contains a conditional assembly switch, called 
Seage> Dios", which, when enabled, produces a lcader BIOS. 
The effect of this switch is te modify certain addresses me 
Meee =PpOond tc entry pcints into LDCPM and LDBDCS and to 
eliminate BIOS code that is not needed in the loader version 


of a eIoOs. 
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The loader BIOS is configured in exactly the same manner 
as the BIOS itself and is fully described in Section D.4 of 
Chapter VI. The two files CONFIG.DEF and DKPRM.DEF must be 
modified to meet the user's requirements and to reflect the 
Meyvace that will contain CPM.SYS. It 1s the default drive, 
or CP/M-86 drive number 0, that is specified in the device 
takle that determines which device will be searched fora 
mem. siS file. 

The loader BIOS generation procedure is different fron 
the BIOS generation procedure. Upon nodification of the DEF 
files and successful assembly of MBBIOS.A86, a file called 
MEEIOS.H86 is produced. This file is concatenated to 
LOCEM.H86 and LDBDOS.H86 using the CP/M-86 tility progran 
called PIP.CMD. The resulting combined file should be named 
LDEBIOS.H86. The resulting leader CCP, BDOS and BIOS hex 
Memen 2s then cenverted to the CMD file format by executing 
the CP/M-86 utility program called GENCMD.CMD. The GENCMD 
Cpticns of an 8080 memory model and an absolute code 
Mmeea-20On of "A400" must be specified. The format of this 
command is as follows: 

GENCMD LDBIOS 8080 CODEL[ A400 } 
Finally, the new loader BIOS must be copied te tracks 0 and 


Meer the new system disk. This is done by executing the 





CP/M-86 utility program called LDCOPY.CMD. Assuming the 
leader BIOS executatle file was called LDBIOS.CMD, the 
fcollcwing comand would be used to initiate this prccess: 
LDCOPY LDBIOS 

The LDCOPY program will ask for a destination drive to 
receive the LDBIOS program on its track 0 and track 1. The 
target drive shculd have a scratch floppy disk (if an iSBC 
202) or an MBB-80 board. A cecmplete descripticn of the 
LDCOPY procedure is given on pages 77-79 of Reference 21. 
C. EFRON GENERATION 

With the boot lcad program, MBEBOROM, written, the only 
remaining task was the generaticn, cr programming, of the 
required EPRCM chips. The 1SBC 86/12A has 8K bytes of 
onEcard addressable EPROM, previded in four Intel 2716 EPROM 
Beers Of 2K bytes each. Because of the odd-even addressing 
of the iSBC 86/12A, two of the 2716s are devoted to the 4K 
even address tytes and tne other twe are devoted to the 4k 
odd address bytes. These even and cdd address EPROMs are 
located ac socarting addresses OFEQQOOH and OFEOQO1H, 
respectively. 

As previously mentioned, the 957 monitor program of «he 
Miter sc DD MDS system occupies a large porticn of this 


OnEcard EPROM address space. The monitor occupies the 
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address space between OFEQOOOH and OFFD22H and also has jump 
vectcrs located between OFFFEOH and OFPFFFFH. The address 
space available for toot loader pregrams is approximately 
720 (decimal) bytes between the end of the monitcr and the 
jump vectors. Since this availakle space is located 
entirely in the upper 4K btytes of the onboard EFROM, only 
the two 2716 EPROM chips containing the upper 4K bytes of 
address space need to be modified when incorporating a boot 
leader. 

Meerlizing the CP/M=-86 utility program called DDT.CMD, 
the contents of the upper 4K bytes of the 1SBC 86/12A's 
onboard EPROM was read into memory and then saved as an 
executable CMD file. The INTELLEC DD MDS system was then 
reconfigured to the standard Intel 8080 sytem to facilitate 
the use of the ISIS cperating system and the Universal Pron 
Pregrammer. The CP/M-80 utility program called DDT.COM was 
then utilized to replace the the existing bcot loader 
perticn of the saved copy cf the EFROM contents with a copy 
eon SBSOROM.CMD. This resulted in a single, complete, 
contiguous copy of the desired EPROM contents. 

Intel 3080 assembEly larguage oprcegrams were then written 
Memeplit a file intc contiguous blocks of odd address and 


Seemeaddress bytes. Using the CP/M-80 DDT pregram, the file 





containing the new EFROM contents was loaded into memory and 
@hen €ach of the splitting pregrams loaded and executed. 
This resulted in the desired EPROM contents being divided 
mentc <cwo contiguous blocks of 2K Eytes each, ocne block 
containing the even address bytes of the split file and the 
other containing the cdd address bytes of the file, and 
stcréed in RAM. The ISIS cperating systen was then Eooted 
with the two split blocks cf the new EPROM contents still 
meened 1n RAM. The ISIS Universal PROM Mapper (UPM) systen 
was then used to pregram two intel 2716 EPROM chips, one 
with the 2K kyt2 contiguous bicck of odd address bytes and 
the second with the 2K bytes of even address bytes 
previously stored in RAM. The contents of the two newly 
pregrammed 2716 chips was then verified using the facilities 
of the UPM systen. 

The new EPROM chips, ncw containing MBSORCM.CMD in place 
of the boot loader provided cy Reference 18, were then 
placed on the iSBC 86/12A and operationally tested. Boot 
lcading fzom both an iSBC 202 disk and an MBB-80 "disk" was 
Successfully accomplished. To ensure compatibility with the 
previous implementation cf Reference 18;, the CP/M-86 
Operating system of that implementation was successfully 


beet loaded with the new E&ROM chips. 





VIIZ. CONCLUSIONS 
A. IMPLEMENTATION SYNOPSIS 

All of the stated goals of this thesis were successfully 
acccmplished in this ixzplementation. A magnetic bubble 
device (MBB-80) was implemented utilizing a conventional 
micrccomputer operating system (CP/M-86) and a commercial 
16-bit microprocessor (Intel 8086). A fully cperational 
system capable of testing, evaluating and utilizing a 
Magnetic bubble device in a standard user environment was 
presented. 

This implementation was accomplished in a manner such 
that future modifications and additicns of hardware will be 
relatively easy. The hardware-dependent Basic I/O Systen 
(BIOS) of the CP/M-86 operating system was developed and 
coded as a structured, modularized, table-driven module. 
Device-dependent routines were isolated and confined to 
specific subroutines and tables. Device-independent code 
meme -Cuctured to operate, without modification, utilizing 
the tables and subroutines which describe the specific 
hardware of the system. Documentation and structured 
pregramming techniques were emphasized to provide <¢ase of 


prcegqram maintenance and nodification. 
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This implementation provided asystem in which the 
MBE-80 magnetic bubkle device has the functicnal appearance 
of a disk to the CP/M-86 operating system. Conseguently, at 
the user-interface level, ne special considerations are 
necessary to utilize the magnetic burkble devices. 
Additionally, a system was generated consisting entirely of 
magnetic bubble devices. The system BOOT KOM and LOADER 
prcegram were modified to show the feasibility of rooting the 
CP/M-86 operating system from a magnetic bubble device. 
This produced a fully operational system supported only by 
magnetic bubble secondary storage (viz., no floppy disxs). 

This implementation and the preven feasibility of a 
System uSing magnetic bubkie devices suggest many possible 
applications for this type of system. An operational systen 
1s now available for further testing and evaluation of 
Magnetic bubble devices. The MBB-80, as a logical disk 
device generated intc a CP/M-86 eEnvironment, tecomes a 
compatible medium fcr different host systems (viz., hard 
disk, double-density, single~density). MBB-80 boards can be 
moved to any CP/M-86 MULTIBUS systen, which has been 
generated with MBB-80 devices, and used to transfer files to 


tne hest system media. 






B. RECOMMENDATIONS FOR FOTORE WORK 

There are four major areas that present opportunities 
for future work. These areas are: (1) storage mapping 
schemes; (2) MBB-80 performance measurements; (3) generating 
and testing of new magnetic bubble devices; and, (4) 
implementation of new and existing applications utilizing 
MBE-80 devices. 

The storage Mapping scheme fom sence MBB-S0, as 
implemented in this thesis, is both simple and efficient 
(viz., speed of code execution) but wastes 15.2 percent of 
the tctal capacity of the MEB-80 Bubbl-Board. Many storage 
schemes are possible if the MBEB-80 is to be configured as a 
non-standard disk (viz., nen-standard in relation to CP/M-86 
track, sector and blocking schemes). It is not clear what 
physical configuration of the MBB-80, as logically presented 
to the CP/M-86 operating systen, will provide the best 
tradeoff between speed and usable capacity for the MBB-80. 

The performance evaluation cf the MBB-80, as generated 
into CP/M-86 in this implementation, was limited to simple, 
timed tests of CP/M-86 utility operations. No attempts were 
made to perform an analytical evaluation of the low-level 
MBE-80 bubble operations in comparison to the correspending 


low-level iSBC 202 disk operations. The MBB-80 low-level 
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diagnestic programs of Chapter V would provide an excellent 
vehicle for collecting data on the perrormance cf low-level 
MBE-80 operations. Additionally, no evaluation was made of 
the operational and/or environmental ruggedness of the 
mee-80. Much work is pessibie in determining the 
Suitability of magnetic Eubble devices for use in harsh 
envircenments. The fully cperaticnal magnetic bubble systen 
mer «6allow for testing and data collection under actual 
@perating conditions. 

The nodularized, table-driven BIOS developed in this 
implementation is easily adapted to new hardware. Magnetic 
bukkle devices based on new, high-density technology with 
parallel block/replicate architecture can be generated into 
the BIOS by simply adding appropriate device-dependent 
read/write recutines and appropriate table entries. The 
framework provided by this implementation of a BICS wiil 
lend itself zc the addition of device types with a nininun 
mmemn. Of re-coding. The implementation of currently 
available 256K byte and 1M Lyte magnetic bubble devices intc 
feemce/S-96 3810S would provide a Significant imprcvement in 
#he usefulness of this implementation as a host development 


SySsten. 
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Painelly , this implementation of a BIOS can support 
multiple (up to 16) MBB-80 boards. With multirfle boards 
(disks), this implementation system would be suitable for 
existing applications that utilize floppy disks. A total 
Magnetic bubkle system (without ‘fleppy disks) has been 
implemented with a single MBB-80 board. This allows the 
implementation of many applications cn a total MBB-80 systen 
where the availability or desirability of floppy disks is in 
meuct. 

C. POTENTIAL APPLICATIONS 

Chapter II and Chapter III presented evidence showing 
the current and future potential of magnetic Eubble devices. 
The capacities, access rates and transfer rates cf magnetic 
burble devices are tecoming ccmpetitive with, and often 
surpass, most conventional secondary storage nedia. 
Additionally, the characteristics of non-velatility, low 
DCWEL consumption, environmental ruggedness, haven 
reliability and low maintenance exhibited by magnetic bubbls 
devices give this technclogy a decided advantage over 
ccnventional secondary stcrage media abc certain 
mepi2cations. Spciclcical ily, tie apelacaticn Cc. Magnecz 
bugble technology to the military environment appears very 


desirable. 
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Magnetic bubble devices require only DC pcwer sources in 
the range of 1.0 amperes to 3.0 amperes at 5 velt and 12 
volt levels. Power consumption is approximately 32 watts 
per megabyte cf data capacity. Floppy disk devices require 
beth AC and DC power sources. AC line frequency must be 
within one-half (1/2) hertz of the required frequency 
because of its effect cn disk rotaticnal speed and, thus, 
the read/write tolerances. DC power sourceS are in the 
range of 5.0 amperes to 8.0 amperes at 5 volt and 12 volt 
levels. Power consumpticn is approximately 350-400 watts 
per megabyte of data capacity. Magnetic bubkEle devices can 
operate in temperature ranges of 0 te 70 degrees Celsius and 
Mairtain data storage integrity in the range of -65 to 150 
degrees Celsius. Magnetic devices can operate reliably in 
up tc 100% relative humidity. Fleppy disk dévices can 
Operate in temperature ranges of 10to 40 degrees Celsius 
and at relative humidity levels tketween 20% and 80%. 
Operation of floppy disk devices outside these ranges can 
result in distortion of the diskette, followed by oxide 
Meeee1Olaction, hygroscepic expansions, off-track recording 
and finally, irreversable magnetic effects. Magnetic bubble 
devices can withstand shock up to a 200G force and vibration 


Mmpe=O a 20G force. No comparable figures for fleppy and/or 
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hard disks are available since excessive shock and vibraticn 
are ytohe considered as Sane of their potential 
Nenvironments." Mean time between failure for magnetic 
devices is typically 5-10 years as compared to 5000-8000 


heurs (approximately 1 year) for floppy disk devices. ine 





shcvuld be noted that disk devices, in general, reguire 
periodic maintenance and magnetic bubkle devices dc not. 

Recause cf the stated advantages of magnetic bubble 
memcry over cther existing secondary storage technologies, 
it can be used in applications requiring mass storage of 
real time data that can be transferred to the system's main 
memory for precessing. Most military applications have only 
the requirement for loading of fregrams and relatively small 
amcunts of data to main memory. In these cases, the large 
capacity and transfer rate advantage cf hard disks (relative 
ae) magnetic bubble devices) would not be needed. 
Conseguently, magnetic burble devices are a prime candidate 
for use in real time combat systems that must "gc to war" 
such as the U.S. Navy's AEGIS weapons systen. 

Several specific military applications are currently 
using magnetic bubble devices. The Canadian Navy uses 
Fukble memory for data recording at sea. The U.S. Aix Force 


uses Magnetic bubble cassettes to distribute and run F-15 
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aircraft maintenance diagnostic programs. Most military 
applications requiring a ruggedized storage medium are 
currently utilizing tape cassettes and rlexible disk drives. 
Burbtle memory, in pertable cassette form, offers significant 
advantages over tape and disk media. A 2M bit bubble memory 
package, capable of operating in a temperature range of -54 
to +155 degrees Celsius, is being developed for the 
Department of Dertense fy Western Electric and Bell 
Lakcratoriss. It is targeted for use in awidé range of 
Merredty applications. [Ref. 23; pp. 89-90} 

It is apparent that there exists a Significant need for 
magnetic bubble devices in military applications. 
Currently, the industry is addressing the problems of making 
magnetic bubble devices economically feasible, portable and 
more reliable. Even if the cost per bit remains higher than 
cenventional media, the advantages of magnetic bubble 
devices in both military and commercial environments will 
present a convincing argument fer the need and use of this 


technclogy. 
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AEPENDIX A 
PROGRAM LISTING OF DIAG80O.ASM 


FILENAMES: Fascal = ME.DIAG80.TEXT 
CP/M = DIAG80.COM 


Pe Pet tt Sts Se SPF StS SPE LS PEP SEE SE SESE SESE SE SESE ST SESS SEEDS SSS SS 


8080 DIAGNOSTIC TEST FOR PC/M MBB~80 BUBBLE MEMORIES ~ 
oe py He He 3 ai 2 2 3c 3 he Re ie ie fe a SH a eee he ic i te oe ee aie AI I Ek 


CCNFIGURATION: 
HOST - Intel 8080, 16 address lines, MDS systen, 
data bus on 8080 is ade Diesen.) a 
MBB - interrupts enabled, interrupts inhibited in 
software, single-page mode, 20 address lines 
decoding. 


Simple bubble test for the 8080 - writes or reads one 
user specified page at a time - user also specifies test 
attern 1f£ writing. Status register of MBB is displayed 

o the console whenever used for debugging. 


The MBB-80 controller base is defined by *P$contkase’. 
MEB-80 address select pins must ccrrespond to this 

Bee eos: This program uses memory mapped I/O thrcugh the 
ase address. 


26 he Die og che ie, ie Ae He ie ae Sie ic he he ae he he He He ae eK ee he he He ae Hee he He ae Me He he We Ae ae He WE HE HK Ke He He ee EK 


a 
Jeffrey Neufeld and Michael Hicklin CS-03 Thesis * 
oft 2K i Ae Fie He 3c Ie Ke He HM ee eR HH ACH 2 BK KK HO HK KK KK 


% 


a 


* Bdos functicn numbers fcr calls * 


tH Reo we FD 01 Cee oe OO) UD 46 Cw e 06 oe Cee CO we eS e SEG SESE E SELES EDECEDECETESE SHESEDEDECHDE WE 


dcsS$conin qu 018 sfunc # for Bdos read character 
dcsS$conout equ 0248 sfunc # £or Bdos write character 
desfentry 2qu 0005H pene ryAtorscal! to -Edos 
dces$pstr equ O94 TSMic AtMrce BOOS UDEInt string 
des$reset 2gqu 008 sfunc # for CP/M-80 reset to CCP 
* Miscellaneous Baeeae * _ 

lank equ 020H ;Ascii blank 

r equ QOdH ,consaage return : 
ol equ ‘ft 7ouCeeme Smeang Char EOL pstrsinc 
a equ QOad ;line reed 

* MBB-80 characteristics (equates) 
Bgraxpages a2qu 641 ;# of pages on each bubble device 
Efpagéesiz2 2qu 18 ;cupcle device page size 

me 22E-80 command eae masks 

MBécusy$check 2qu QOQIOQDQO00E sis cont kusy? check (20H) 
meelnictscad 2qu QQQQOQOQO1EB ;intialize the controller (01H) 
MBfreadscad 2gqu TOCQQQTOE ;single-page read cmd (82H 
MBSresetScnd equ 010000002 ;reset the controller (40H 
MBEwritesScnd equ 1O0COQOQ1IO00E ;single-page write cmd (84H) 
memeee-SO Ccntroller and Pecrts - 
P$ccntbase equ 040008 ;cbase of controller 
P%esello equ PScontbase ;page select lsb 

foese lh: equ P$contbase+1 ;page select msb 





soveesesecves MOMu VUiUlUd'D 
i oF 


DIAG80: 


Loop: 


Read: 


eit > 


Ask$User: 


2qu 
egu 
equ 
equ 
equ 
equ 
equ 
equ 


org Q1 
xe 
das 
LxXxi DF 
call Pr 
call 
call 
call 
Cpl 
az 
push 
Gactl 
call 
POF 
CPi 
Wz 
call 
call 
jm 
Baul 
eg iltl 
mp 
%2 
call 
mvi 
call 


QQ59 “MQIGQMWO -p 
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ns 


iene t 
Init$Devs 
kSU0ser 


DO WND DIASON 


ASKSUSER 


€contbaset2 
$contbaset3 
$contbasety 
Econtbaset5 
eee ae 
$ 
$ 


P 
P 
P 
P 
P 
3 contbaset+9 
P 


FROGRAM 


OQH 


SP,0b000H 


cE eecnen 
Meet ha ng 
$Cont 


os$entry 
* keke Rk RK ond of 


Main 


scalled frcaoas: 


e Kok 


1X2 
call 
call 
push 
call 
DO 
re 


WOW Y Cree wre 
WAM Miwhis 


ms gsaskfunc 
Mn eSoce lng 
ee 

Sipe 

a 


V2a7 


centbase+12 ; 
contbase+15 


;command register 

;read data register 
;write data régister 
;Sstatus register 

sloop size isk 

sloop size msc. 

pa Size register. 

;bub dev seLect register 


MM Te HK she He HK He eH HH He HM NE He ee KK KK KKK KK KKK KK KK KKK KK 
o* 


MAIN CRIVER 
BH He He He Se 3 ie ee He He He Ke Ke Hee I HE HE EO A ee OA ee i He he i i a a a eo a a OO 


stack pointer to app 44K 
disable interrupts 

addr cf signon nsg 

7peont 1t 

eanat them@lbs contreller 
;init the bubble devices 
;user want read or write? 
;dces user want +o quit? 
See sic pgo Guilt 

;save user's answer. 

s;get user bubbie # for test 


*egewewe 


;get user page # for test 
stestore user's answer 

sis this a read? 
sae SO, read ; else=write 
;get user test pattern 
;Write the page ZO. MBB 
TdOmUnerl. Wants tovgquit 


;scead tack the Ro 

sWrite out results ; 
[doOmUnxcaL Wants to guat 
;addr of done message 
Ajeeas ky ce ple ; 

; Une. ~. ©O gust 

;call Edos to terminate pgm 


PLOGL AM FREKKKAKKKAKKK EKER KE 


Leb t tt Pett PSE PLES ELE EEE ESE SESE LEE EES FETE EES SEES TESS SESE SE Tt SS 


Subroutine * 
@ oe he ee AC Ae ee eK Be he i eK ee A RR RE I RI I RE i OE 2 aie ae a 2 
Haat. 
asks user 1f wants read,write,cr quit 
a ea me ol = 
** parm out - 


none. 


ans in reg A,Rk=read,Q=quit 
all else=write. 

sagan CL aSk £Ecr fumc msg 
sp Lnt it 

;get the user's answer 
ssave user*’s answer 

sskip a line after input 
;restore user's ans for ret 





Tee TICTSCTCCOCSTOCS SOLO SLOCCCSTSCC SSL EPS Se TT ee eT eS eT Te Prt a rs 

** CRLF sukroutine 4 

TTC TESTICLOCOCLOCCCSC£SCCOSLCSS OS SSC S+T SSCL ESS ESE STS SET SS ET SE 
; called frcem: AskSUser,Get$Bubble,Get$rage, 

Get $Pattern, Print$¢ut. 

melt: Dae issues a carr ret, line feed to console 

<3 ok Earn LD —- nene. 

2 oF parm out - none. 


@2@eeeo ot 


mvi A,cc “carr ret 

Gall print $Char ;Output one char 
mvi A,1£f sline feed 

se Print$Char ‘output one char 
re 


i (en mane ere a ee ee RES 


GETSBUBBLE subroutine 
a eal hho hae eeeeaeie 


scalled frem: Mai 


@eeseae we 


Get$Bubble: = 3 a gets burble # tor test from ccnsole 
;#* parm in - non 
~ 3e* Pate jout - loads 'bubdev' variable. 
ile <a D,msa$ etbul ee of get-bubble asg 
Gali Ppsinetsering Ent alt 
sget bubble number - one’ yte (0-7) 

call GetS$Hex ;get hex digit 

ani Ofh {Glearenagh pieble 

lxi D,bubdev te \tol(olig Be ev byte 

stax D sS COLE 1 

Gaui Crif ;skip a ate after input 

ret 
2 ie ae ee i ee te ie ek A a AI ef ICR RE RE aR a I a aR ae AR IC IC a a 2 ae 2k 
° x GETS$HEX subrcutine | * 
2 A He ee 2c a a fe ee Re I RC ACI RAG RC I I I ee a 8 ke a a ie AC ote oe 


; called freom:s GetSBubble, GetSPage, 
Get $Pattern. 


GetSHex: Se gets a Hinboe rrom cons, converts both 
: nibbles to the hex value,ie., 'F*" keyed 
‘ in = 46 Ascii, so FF returned in A 
ek* parm in - necne. 
;** parm out - double hex value in reg A. 
call Read$char ite Gnae fron crt 
mvi H,08H nile ete: EC of taple addr 
mov L,A low byte - index tc table 
a As ‘gable Lookup 
re 


he ee ee He EH He HR NH EH HE Me ee KK HR RK KK KH HM MH HK HAMA K KKH HK KK 


* 
om GETS$PAGE subroutine x 
oR Tre TISCTECC+OCT CTT eS TLCCOCT TPT TS CETTE TST TT eT TT TT TTT TTT TL 


S@@e00 896 ee ee 


scalled frem: Main. 


2¢$Page:; ;** gets user page # for test from console 
¢** parm in - none. 
<= eaee out - loads ‘pageno' variable. 
a D,ms etch he ;addr cr getpage msg 
all prints eee Fore | “Dra. .t 
phigh ali =) Jes page humber 
Get$Hi ;get hex digit 
ne Ofh ;clear mae nzabole 
ixl D,pagenoshi ;addr Bene high 
stax D "store. 
slow byte - 2 tle to 1 hex jigit in pagenoSlo 
Gow  gatSHe ;get hex digit =e 
anil Of0H sClear iow nibble 
mov B,A ssave high nibbie 
push B ;save high 
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Seen 0t wows 


Catt 


GetSHex Fcc CemaLglt —10 

OfH sCclear high nicble 

B ;cestcre hig 

B combine hi and lo 
D,pagenoslc ;saddr pageno lew 

D -Seoye Lt 

Cale ;Skip a line after input 


ie tae” Mee et ee 


GETSPATTERN subroutine 


ee ees sso ceed ka S425 RS SEED ER KAKA SEHR SEES D 


Getg$Pattern: 


O@G@eoe Cewe se 


if 


@eegewse Ceee 


lea 
call 
cata 
ani 
MCV 
push 
Cail 
anil 


‘camted teons Mains 
;** gets user pattern for test fren console 


-k% Darm out - loads ‘pattern! variable. 
D,msgfgetpe saddr cf get pattern msg 
Print$ cecsh ele -print alse 

GetSHex ‘wee nex aigit 

Of0OH ;Clear low nibtkle 

B,A ;save high nibble 

B ssave high 

Get SHex sget hex digit 

pe jclea=ehagn alcole 

B ee core igh nibble 

B ‘combine hi and low 
D,parttern ‘addr cf pattern 

D ‘store bugd 

GCELt -skip lines after input 
Srle 


(ie. Mannose See ee en ee 


x 
ok 


mee pCont: 


= 
bd 
* 


nit$Devs: 


aaa 
Gait 
ee Gal 
Py. 
MOV 
UES del 
mov 
1G ol 
nVvi 
ax 3: 
mvi 
Bh pe 
call 
Bee 


eel: 
cali 
NVvi 


INITSCONT subroutine 


eo ERS a at ks Nae 544 aos ee ae ROR RR RRR HE 


joa led trem: Main. 

***® units the MEB controller 
<a parm in - none. 

2 a parm out - none. 


Ld] 


Dd, sgSinitc saddr of init msg 

Ee Jee toe ee Od sprint at 

B, MB$maxpaqés ela in each Loor 
fee Tecr eZ 16 anes sbi -cort 
ee ea ong loopsize 
4,P$loopszhi -1co size msb for 

M,2 sloa msb of loopsize 
#,PSo0gsize. age size port 
M,MBSpagesize Oad page size 

i, PScmdreg errceha Begister pert 
4,ABSresst$cad ;issue reset commana 
Do ES eho ;addr cf done msg 
Pant sStrL ag el ne. Lt 


Et He He Dc HE TR A AE Me RM ee OK HK HK HK KK eK EK KK OK 


PNG rItpevyS  SuUsecutine x 


SR he He 2 ie ae He He Ce oe Ae i ie ae ae he ie he Oe HE ee a ee he HK AK HK KH Ke KK KE KK KE KK OK OK 


,carved trem: Mala. 
-** Inits ¢ach tubble device on the MBB 
se Damen 1n) = None. 


== Darn? Out —- nove. a: 

5, msgSinitd sadd= Of init asg 
PrintsString release cage Meo 

Asc stirst device # 


2s 





FachS$dev: 


push PSW ssave device # 

adi 0Q390H joonvece €O aScil 
call Pei nese har eee Act 
lxi. D,msgS$dev. saddr of dev msg 
Gan. Beintsstring Re) scoljolke Reales 
pop PSW ;srestore dev # 

ixi H,PSselbub ;select bubble port 
mov M,A sselect this device 
ush PSW -save dev # 

Xi H,PS$cmdreg ;cOmmand register poet 
mvi M,MB¢init3Scnd ;issue init comman 
call Wait slet controller work 
ial cP, asg$done saddx cont done msg 
Gail Pramcos eee ng Riepecticns slew 
pop PSwWw ;restcre dev # 
ant A snext device # 

Cpe econ slast device ? 

nz tachs$dev (canoe, dO hext 

Xi D,msq$doned 35) (olla 6 done asg 
Call. PrinesSering SEL nG +t 
ret 


PRPS Pte LTS SESS PETE SS SELES TS ERS E EEE ES ESET TES ERT SPSS ES tS SS tS SS 


sk 
ca LOADSPAGE subroutine * 
Tee TT SCCTOCCC$$$CSCOCCSCLSCSCLCSSOCT CLEC CST SOS SSCL +e STS st eS 


*CcCalled fEress ReadsPage, WriteSPage. 


@eegeeGeoeews Ot 


Load$SPage: -** loads the variablé 'pagenc' to the MBB 
= ok Palbumap - nene. 
3k parm out - none. 
lxi 4 ,pagenogsgle ;addr of page # 1sk 
mov A,4uM » tO accu 
Lei D,P$psello age select isb pert 
stax D oad it 
Eg TS Ge! te page # msb 
nx MD ;to page select msb port 
mov A,M ;to accu 
stax D sieead.s. 
ret 


i ee ee ee See ASO ALA ESS SPAS AAAELAEL LATE SARS 2 

> PRINTSCHAR subroutine 

aa yay eee es x xke N48 SEE TNS OD LO Se adENRSS CRO EEE Coee Ke 
seallLed fren? CLI£, lniteDdDevs,; Princes, 

; Print$2. 

Beane >Char: s** calls Bdos to write a char to console 
aoe mf = Char <OmWrite LaekReg A. 

Jan Cal teou. — TONS . 


@eesePWe we BO 


Nov a sload parm for Bdos. 

rvyi C,Bdesetconcut <;f£unc for Bdcs write char 
push PSq 

call BdosfSentry sCall Bdos to write 

pop PSswW 

eae 


fee +b it See SES SETS E SESS SE SSEPS ES ES ESTE ESS SES PSPSPS SSP LT SSS SS SF 

ia PRINTSOUT subroutine = 

she se he fe He he ie he he He fe He ee a 9 28 ge ke OE IE 2 i he A ee CR 2g RR a a oR a fe 8 KC ie 3k a 1 he a ae ake ok 2 
; -Caeelcd icLom: Main 

een csOut: -«* reads page from MBB buf-writes to cons 

= ie 3 Dalteuln = none. 

* 3 Stee out =~ none. 


@eee Ce wmewe 


Loge, Bye msgfpr facdn OL DEint Out nsg 
call Drints tring qe at 7 alee 
Mvi cC,MBSragesize ;counter for bytes to read 


130 





Erts: Lzxi ,P$rdreg sread data Eedeece= port 
ldax sload from fifo to accun 
push ;save counter : 
Call Beints2Z sprint what was read 

op srestore counter 


‘dec ccunter 


Q 
a 
AVWVOVAW UBIO 


Inz Pe sread next if not 18D read 
xi msdeace? ;addr cf done msg 

Can Pee poe bang eet - 

Gall Crier sSkip a line 


2 te Ke fe He ie he Heo aie eC hc Oe she oh he He he Me he He ee eH CE Oe oe EK Ac 2 ME HE Oe 2 I Oe a Oe a Ee OC i He Oe 


oie 
cad PRINTSSTRING subroutine | *® 
Ee E EST SCCCOCSTSLOSTSCTOCPCCSL CCC CTCL CLL TS SSL ICS SSS PSC SS Se S| 


sCalled frem: Ask3User,Get3Burble,GetsPage, 


: GetSPattern,Inictscont,InitsDevs,Main, 
: PrintSCut,ReadSPage, Write sPage. 
Berne soctrings ;**® prints a string to console via Bdos. 
;** parm in - address of string in reg D. 
Petco ale Out = Hone. ; . 
avi. C,Bdos$pstz -func# for Bdos print string 
us 
Eall Bdosfentry ‘Calle bcos tO print 
po PSW 
re 


@26$@6¢ He 


CP EPLTESCTICSESS  oSCSCoLCOSCCSSLSSCSSCS + SS PCS SCC OC LSLSLOSSCS SPS S| 
° c& PRINTS1 Subroutine 


* 
oie Fe S20 290 ate fe ie fe ke fe fe oe ef fe i aE RIOR RII aK i a RO 
scared £LOm: Print s2e 
** converts hex value of low nibble to 


Prints: ’ 
RScia aka crints it to console. 


so© Dabw th = hex value to print in reg A. 
Dea Dae me out = none. 
ane O£H ;clear high nikble 
adi 0908 SCCHVEEtC aL 
daa 
aci O4OH ;convert lo 
daa 
eee ene aboe 10) llebe Jer ne char 
re 


MH HM MMe eM He He Me Me He HE Me Ce Ae he eH ee he Me EK a Bee OK MC a ME ee ee a ce eK he ok i OO KKK 


24 
a | PRINTS2 subroutine * 
PEPE rSLeSP SEL SSS Pere SPST C SC TEeTOCCSSCLTOSSOCCSCSTOSS CS CS EL eS 


; joouread cLeme. PrintsOut, cast . = 
Beene 52: 7** converts one byte hex to two Ascil 


9 : e 
; digits and prints out one at a tine. 
Jeep aorm In = hee Value to print in reg A. 
jon parm Cut = none. ve. 
push PSW ssave low digit 
mac lreclarcerrc! ;move hi nibble to low 
Cait Peints 1 SGOnVeErEt and, print 
pony ay ce pea Cre aos iy 
ca eet ;CONVErt an rin 
mv. A, Blank blank char 
Gail Printschar sprint it for separation 


ret 
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@ ee a he oe ate He ae aK ate he He Hee he ee oe ee Oe ee He ae HH RK KK EK KK KKK AK HK 
, 


* of READSCHAR subroutine 
2 re a i a ARC HE ie ke CE fe A a RC IRR I a RI a I RE a ak RK a 2 


scalled frem: Ask$User, GetsHex. 


read$Char: 2 reads one character from the console 
see Darn ir - nene 
Lae parm out - chat read in reg A. 
avi Bdcs$conin Seine #6 LOL Bdcs read char 
eal B§osgentry ‘call Bdos to read 
ye sclear parity kit 
2 


s 
2 Cee i ai io ee aa a Oi ICI AGI AGIOI IG IID. i 2 a IC AC ak a ie 2k ak 3 
° READSPAGE subroutine = 
ss S52 * FTE ARLES LANE AE SSA SSS ELA HSA ELES £4 AAA AAAS HENS HS 
Neal CGmEr CH: Gtiaan. 
Read$SPage: 2 ak ok interfaces with MBB to read a cage 
Se parm in - usés 'pageno® & Bonedect vars 
: arm out - none. 
call toad Fage sload page numker to MBB 
sload bubble device number 
lxi D,bubdev ;load addr of dev # 
ldax D 7 eo, 2ccunm 
lxl H,P$selbub -select apps register port 
mov MM, slcad dev 


ASS read command 


Hoek ;addr cf reading msg 
ean) Derneroc el ng [DEwnec- 1c 

Exo de P$cmdré ;ccmmand register oS 
mvi »Mefread$cnud jissue read comman ; 
call wale ;slet controller work 
1xi_ D,msa$done ;addr cf done asg 

So Perens tri nig =i op ce 1 ol a ig 

re 


eae SR Cece eg ee SES SEERA ANE ERE ES 


AIT sukroutine 
ee. eee a eyes ceeandd kedaSuenkes 


ee yoo from; Init$SDevs,Read$Page, 


rieaiee 


WriteSPage. 
welt: Sx makes a delay while the cont works 
2 ok parm in ~- none. 
+ fe oe parm out - none. 
Lhla 4 -30 cycle delay at 2.5MHz 
lhid 9 :5 cycles each ihld inst 
Iindd 0 
held 0 
é Jhatd ~¢ 
Walti: ilxi 48,P$statreg ;status register port 
nov A,M -read status register 
push psy ;save Status 
Gaul Prints2 “Wren: Cutwstatus 
pop PSW sLestore status 
anil MBSbusyS$check ;Dusy mask check 
nZ Wait if Busy, check again 
we Hee oScatreg stat reg port-get last stat 
mov A, read status register 
Gail Prints2 -Drint out status 


@eee 


1 84 





gH MFR RE IE Re Re A Re I AK KKB KH EK EK HRA KKK HK 
* ok 


WRITESPAGE Subroutine « 


COI nine aCe Fie SCO IGOR IO IE IOI a GIO a OK i a Foi a a aioe ac ai aa a a 


WritesPage: 


soda 


aeactet: 


nz 
sload bu 
ur 


;issue w 


ees ese @seee 


bukdev 
pagencs$lo 
pacenog$hi 
pattern 


msggaskfunc 


msg$dev 
msqfdone 
msgfdonec 
msg$doned 
neg$getbub 
Bes 2ctPg 
msg$gqetp 


@sasinite 
msgSinitd 
msofprt 
msgfquit 
msg$rd 
msq$sigqnon 


msgq¢gwrt 


call Load Page 
18 test bytes to 


Qo ue OO As uO ues = Pures, 
TOTO rromrnTr7ororrorrry Uo 


;called from: Main. 

;** interfaces with the MBB tc write a page 
* parm in - uses 'pageno' & ‘bubdev’ vars 
- Darm Out - none. 

Eyes page number tc MBB 


C,MBSrpagesize ;,counter for bytes (18D) 


D,PS$wrr3g ;Write data register port 
apes ;addr Crepattern tc write 
A, ;Load pattern to accun 

D ‘write a Dice Of TLO 

C dec countér 
Write sjump if not 18D written 
bble device number 

D,bubdev lend addr of dev # 

D *to accun 

H,P$selbub ;select bubole register port 
M,A ;load dev # 

rite command 

D,nsgSwrt. saddr cf writing msg 
PEerieootri nd Ho) cgay 0) Ma Ro 

H,PScmdreg ;ccmmand register fort 
M,MBSwriteicnd ;issue Write command 

fant eee CONES OLILGE WOT K 
Disa ene ‘addr cf done asg 

PEtn eos er. 1g She le 


as ame namin ues Mee Se ENS 


DATA AND VARIABLE AREA 


ea es and AKA £48 KAAS ATREL EASE KE ROSES EAE Oo 


0 

0 

0 

0 

eo sdeR cor read, 0 to guit, all else ' 
tase write:, ',ecl 

' device # initing. ',eol 

Se sdone.s (cr, feo 

"Done with controller.’ Pa os cae Oy ager 1o ye 

‘Done with devices, ! pcre lie cr, elf, oe 
‘Input 1 digit bubbie # (0- (Op é 

‘Input 3 digit hex page O- 285) eol 
cen 2° a1Gn¢ hex test Bc oen (0 =e Pfs 
eo 

Pivnnclaimna VNa  COMeLOLIGL. .s « 1,201 
WaGealhsekceLur seh sale a MeviGess.< ',el, 1.1L, e0l 


'Dage See is: ze op 
Vapel sii, CL,’ ** nd of Test **',1lf,cr,eol 
tReading: Ge pade ss. s.' 7 GOul 


ihay eae Seep oO@ (Cr 7u=o0 § 
'STAGNOSTIC TEST *e' CI ee neCr, li, 6G. 
VALE StaG ao rages. tr eol 


Ii33 





stable for converting ascii to hexadéecinal 


chee 
aan domOOHe tHe eeu goon. 44H och, ooH, /7H,88H,99H 
org Hf 2 
db OaaH,O0bbH,OccH,0ddH, 0OecH, OrfH 
Be GREECE EERE DEE ICCA REESE AEE ROO AOA IER x 
: End of Prcgran * 
oe ee ic oe 2 i fe ie oc oh fe i Fe iC i 2 a I A 2 2 ie IC ae a a ae fe ae ie 2c 2 a 2 oo 
END 01008 


9 
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AEPENDIX 8 
PROGRAM LISTING OF DIAG86S.A86 


FILENAMES: Pascal = MB.DIAG86S.TEXT 
CP/M = DIAG86S.CMD 


TESTE LTICTTSCLCCCe OCS S SSS SS SLCC OCT OCS T SSE LST CT SSS PSS Set Te ST Tee S| 


8086 DIAGNOSTIC TEST FOR PC/M MBB-80 BUBBLE MEMORIES “ 
He hh 3 oe ake te 3c le fe ee 2 et 2 2 eC i 2H ICR ME I fe ee ee fe ae 2 2 eI CC 2 ai I a a 2K 3 2 


CCNFIGURATION: | 
HOSr -lintel 86/7128 SekC, 20 address lines, MDS systen, 
ei aes on 86/128 cenverting to low 8 bits 
a Gl < 
ne D = interrupts inhibited, single-page mode, 
20 address lines. 


This program writes and then reads a test pattern in 

each page of eacn bubble chip on MBE-80 boards. Error 
diagnostics are printed as errors are found. An error 
Megeis printed at the end of é¢ach pass. Testing is 
ccntinuous until any character is keyed into the console. 


The MBB-80 controller tase address is read into variable 
"ME contbase’. MBB-80 address select pins must ccrrespond 
te this address. This pregram uses memory mapped I/0 
thrcugh the base address. 


BOS GEDGEBSESEDESEGESESES*EBDEDHESGEBDEDE GPeVtweSGese Sweets VO SO 


Me ie oe oi fe ie ie A ie ie ie ie ie ie aie ie ie ie Se aie ee ic ie ie I a ee SE a Ee a I ae OO ie ee i ae ee oe 9 OK i oe oe oe 


: Jeffrey Neufeld and Michael Hicklin CS=63 Thesis * 
oe oh ae ake ok 2 ok TESTES ST ESTE TeTeCT TPIT Pe TTT TTL TLE LT TTL Te. 
s* Pdos functicn numbers fer calls * 

Bdcs_conbuf egu 10 ;console input string funct # 

Bdcs_ conout 2qu 2 MGenscLievOucouULT Char func 

Bdcs constat equ 11 s;get console status funct # 

Bdcs pstring equ 9 epee Senong Until 25? tunce & 
Bdcs reset equ 0 sCE/M~86 resét to CCP funct # 
meeMBE characteristics * 

MB buflen equ 18 stuffer length for single page 

MB maxdevs aqu 7 ;cCubble devices are #0-#/7 

MB maxpages equ 641 ;# of fages cn each bubble device 
MB fagesize equ 18 skubbleé device page size 

;* MBB command byte masks (with interrupts inhibited) * 

MB Fusy_check equ QQIQQQQOE ;¢cnt busy? status check (20H) 
mee init cmd sol vUCOUG TEE sinittalize the ccntrcliler en 
MB read_cnd equ 1Q0Q0Q00010E ;single-page read command (82H) 
MB_reset_cnud equ 110000008 ;reset the controller (CQH) 
MB_write cmd equ 100001002 ;single-page write command (84H) 
;* Miscellaneous equates * 7 

blank egu 020H ;Ascii blank F 

Gerbuft size egu 80 wee cour pus DULLED £Or Console 
er 2qu Odd wicerecCaceTage return Cccrtrcl char 
lea equ Qadu wAscaa lane f£eed Control char 


ies 





ne age ere ge ne ee eS SEERA EER EERE EES 


MAIN FROGRAM - CRIVER 


SAA AA RAR A RAR ARR ER RAE RSET SE ES EEE A RK 


CSEG 
HIaG86S: call Set_Up sdo initialization 
call Get _Cont_Addr “get address of MBB-80 base 
call faat  eont sinit the cont and devices 
Test_loop: 

call Get  ~lest Buffer ;get a test pattern ee buff 
call Write Page swrite a page to buebl 
call Read Pagé ‘read a page trom ae 
Gall Check FIrors ;check errors in write/read 

sadvance to néxt page in a device, see if last page 
inc cUurr_page_no ;increment ae rage # 
eip Curr! mieore Ne juno _ ha Xxpages- 1 ;last pede On dev? 
3 hel Test_ -if not, test nex page 

swas last paqe, SGAREE to next bubble device on board 


mov eo fSet msg_donebub ;addr of done bub msg 


Cal) Pernt Strand swrite msg to conscle 

Cmp curc_Bub_ no, MB_ maxdevs sLast bubble on board? 

iz Done pass if sc, done with a pass 
sprepare to test next pane device 

Inc Curr. bab 70 ;1f nct, increment device # 


mov curr a CE no,0 set Bao humber back tc zero 
ice: rece et c next entry (dev) 
jmp Test_loo oe test next device 

sfinished with all devices on board, print summary 

‘prepare to run another pass if not stopped by user 


Tcne_pass; 


call Error_Summary sprint error summary 

call End_Pass ;end of pass hcusekeeping 
ssee if anything keyed in at the console 

mov. CL,Bdcs_conStat ;function # for Bdes call 


call Bdos eal i Edos to get ccns status 
cmp AL,01 ;0 1=char peiee in, 0O=nothing 
Done_test something eyed, user guits 


az 
s;user wants fo eee 
moy DX,offset msg_ esting saddr of testing msg 
Gwe eeoint String wrl Le neg. ce conscle 
jap tTest_foop *keep. testin 
suser wanted to guit the testing 


Ccone_ test: 


Secuaegdedessgedseve 


a 


Bacs? 


@2ene 


call Close Up sdo end of run housekeeping 
mov cCL,Bdos_ reset sruUnceion we for Bdcs cail 

mov DL,0O ;parameter to release memory 
call Bdeos ;call Bdos to terminate prog 


+9 AK IO ond Of Main Program #4 A aK EK eK eK 


Oh he Me he he eK Hee a he HK he Ke ee he a ES ee ee a I KR ae a OK oe eK KK KK KK OK 


BDOS (CPM/86) subroutine * 


NE oo Se cee He ok AA 2k Se Ah Ak he AA KA NE eR A Re 


;called PeOl. se eS-nUD,din,cet Cont Addr, 
Prunes —String, Puce nia ©. a 
sk* entry tc Bdcs via software interrupt 224 
sk* parm in - caller loads regs aS fer req 
«oe parm out - as supplied by Edos returns 
Bus 224 ; 80 SOruware 2neeruupt 
re 


eke 






0 ote ah ok oie i at Hee ae He Me oh oe he See Oe eH HAH HARA RA KK AERA EKA K KAKA EK KK AH KKAK HK 


. x CHECK ERRORS subroutine * 

2 IR 2 2 ke te fe ie ie ke ee a ee SG a carafe a ai A fe fe a ae fe fe a 2 eae fe ate 2c ak a a ae a 
;called from: Main. 

Check Errorss ;*#* see 1f read what was written 


-f= parm in - none 

(22 parm ecut — none | 
mov AL,pattern spattern to accum for manipul 
mov CX,MB_buflen scounter for loop thru buffer 


F : mov BxX,offset test_buffer ;index into test kuffer 
est a 
i cmp Bees) eee ;compare buff to pattern 
j ood_test si1f gocd, check next byte 
Dush AX!push BX!push CX ;Save Poe ae addr/cntr 
Call res Our trot omvad, “prince ELLlor 
Gall Log_Error ; Cdiecrh rer 

pop CX!pep Bx!pcr AX ;restcre cntrybuff addr/pattr 
Gced_test: 


ne BK sincrement index _ 
LON Test_byte ;dec CX and loop if not zero 
re 


oh oe oie ee He ie He He Ke ae eK ie ee ie CH eK HK HK KK KK KH KKK HK KK HK KK HHH KH KH HK KK 


& 

x CLOSE UP subroutine * 
PEE SrSLOOLOSSOSSSC£LOCL PE tt Sere ree ST Ser St STS TE TST ST PPS StS eS SF 
“Called, from: Wain. 
mcse Up: 3** ceads garbage from console,issues goodbye 

7“~ parm in - none 
pee parm out .- nene 
;Clear stop input characters from the conscle buffer 
Move CUPrdoc Comeur  ;2Nput Console String func# 
mov Pg Ot ceons_buff s;area for cons input 


eesedsvewe oe 


MOV ¥ e ptr (BXj,ccnbuf_size;telill Bdos buff size 
mov Dx, Bx ;Load parameter reg for Bdos 
Cali Bdos ;read the console 

sissue the weoidbiy < message . . 
Gall Gel ;Skip extra line 
nov DX ,of fset msg_endtes saddr of end test msg 
Cat) (rant Striag swrite msg to conscle 
ret 


OR Me We he Ae Se ME i hee he he fe ke ee ic ie He She He ae te HE he OK RHE ee ee Ee Oe EE a eK a KE oe RK EK 


bf 

* GRLF esubreutine * 

SEP ETSCCLSOSCS SSL +SSCSOSTSSSSSSSL SSS SS PSSST SSS STS SS TLS Se TTS eS | 
;scalled from: Close_Up,Get_Cont_Addr, 
Wier dc= un. c CONcyNain,6 co. Nc Sec lng,Set Up. 


Ss@ewePewge ese 


mcif: s** Sends carriage return,line feed fo cofis 
;** parm in - none 
joe DAarM CUT — ncne . 
mov AL,cr ;Carriage return char 
Canpu Putchar {wertce.1t tc censole 
TOv-— AL Le sLine feed char 
call Putchar swrite it to ccnsole 


DSc 


-e Perret SPSS SEP LPS ESE PES ESSE SEES SE SEES ESE PRS SEL SES ES SE ESSE Ss FS | 


4 
* END PASS subroutine ~ 
289 fe te he ee eR He 2 Fe ie SRE Re he ca he 2 fe A 2 eae ie i fe AC a 2 9 he oe i ke 2 Ce at eK OR 3k 2 2 
1Golled fsem: Main. 
Pass; ;** perfcrms end of pass housekeeping 
——~apacm 2h - o2ene 
7** parm out - none, effects giobal vars 
SCONVEDT Dass # tc Ascii and print after pass nessagé 
mov. AL,pass_no._. ;pasS number tc accun 
eal WexsTO. ASC: 2 TECnVert torasci: 


@ege Sewewe 


ta 
= 
Qs 


le 





DOV 
NOV 
ince 
MOV 
nov 


BX,offset msgq_d_ pass;addr of pass # in msg 
iss Pee [BX ),DH ;load high byte tc «#sg_. 
B :bump to next fosition in msg 
byte oe [BX],0L ;load low byté to msg 
offset msg_dcnepass ;addr of done pass msg 
Peace sc L2n 9 sWlite a=9 to conscle 
a line 


CE oP 
sinc pass number and reset a 1 variables fcr new pass 


EOS 
nov 
nov 
nov 
nov 
aa 


pass_no ;sadd cne to pass number 
newoass flag,1 ;séet new-pass | ca 
curr bub_nc,0 ;reset to dDubbie device 0 
curr _pagé€_ no,Q ;reset page number to 0 
errptr,cffset errlcg ;reset addr of error log 


SCPTTTCTCCCTCCCCCS SCC CLCC$§OSCCCCL OCS EST TTT SEP OC Se CCS ST ote Se: 


subrouti 


so . ' SR OUT he . * 
2 A a a 2 He 3 ee i a A Re ee aE a a a I ie 2 2 i 2 a ae ae i aR oR oe 2 


Err_Out: 


push 
Cmp 
qnZ 
mov 
nov 
Gai 


yWeelted ErOMswsCheck Errors. 

;** issue an errer message to the ccnsole 
wa Ddbieen - BK addr in buEf cf byte error 
;** parm out - none, effects global vars 

BX ! push BX ;save addr of error twice 
newpass_flag,1i ;i1s this a new pass ? 

Prt err (loeenecse PLInt error now 
newpass_ flag,0 ;turn flag off 

DX ,offset msg_header ;load addr of header 
PEINC.SeEL VMg sprint the header 


Boe zerOoSs IntO, aii errer counts in the log 


mov CX,MB_maxdevs+1l ;count for # of dev to ioop 
iol Tew Ex, Orctce: crerilog ;addr cf error log 
m5 Log: 

a NOV eye ptr [BxX],0 ;clear log entry error count 
aia B ;bump pointer to next entry 
HOoreclLE Log ;dec CX and loop if not zero 

fee Clr: 
mov. AL,curr_bub_no ;bub dev # to accum 
Gap Howe LOLASC) 1 SECnVers te ASCI2 
mov msg_e dev,DH#H ;move in high byte to msg 
mov msg _e devtl,lL j;mcve in low byte to msg 


sload page number of error 


nov 
Ga) 
nov 
nov 
nov 
Car 1 
nov 
MROV 

scompute 


adar_ 


sub 


nov 


nov 
Gawd 
nov 
nov 
pop 
NOV 
Gael 
RCV 
nov 


AL, byte ptr curr_page_notl;hi byte cf page# 
Hex_ eee ed Paya ee BO VAS CIs 4; 1) 
mSg__pag¢, hia te to msq(di 

msg 2 ace Taine Siow pyee tO as 143 44) 

Te Oe ptr curr_page_no ;lo byte ci paget# 
Hex SPOsASCcI1 poCnVELcC tO ASCI1 | 
msg_¢@_page+z,DH ;high byte to msg(dig 2) 
aSa=s page+3,DL pace ryte to msg(daig 2) 


and load byte cfrset cr error in page 

BX ;resitore addr err Eyte offset 
Ereéf cau cEfset cest burfer ;fcr ccmputation 
Bx, ,addad= butt scOmpute erz ofiset in buff 
AL, BL a ,Orncece CO. Wl £6r ccaversion 
hee elo -ASCl 2 ,GOMVert CO ASG2i1 

msaq_¢ by<¢e,0H ;meove in nlgh byte to asg 
msg_e_ bytet1,DL ;move in low byte to asg 
tern that was written and what was read back 
AL,pattern |. ~Slodcmeae torn juSt WELc ten 
Here tORASCi2 sCGUVerc tO ASECI2 


msg_e_wrote,LH j;move in high byte to msg 
msg_e_wrotet1,DL ;move in low byte to ms 


BX srestore addr cr err offSet 
AL,{ BX ] ope -2 Sad By ee just read back 
Hew ete. ASCi.2 peOnVEeELt cO ASCII 
msg_2_read,DH ;mcve in high rEyte to msg 


msg_e_read+1,DL ;move in iow byte to msg 
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nov 
call 
ret 


« 
& 
oi 


SQ@@a0e@dease ee 


EEECr_ Summary: 


mov 
call 


DX, offset msg_err ;addr of total error asg 


Prameeser ing sprint the error message 


PE Et SESE SESE SEL ESET SESE SESE LSE ESE EEE PTET TPT PTT ETE PTS ET te S. 


ERROR SUMMARY sucroutine 


* 
PEPE SESE SS SEL E TES EST S ELE SESE SST TTS SE TT TT ES TCT ESET FSS SS SS 


scalled from: Main. : 
3** outputs summary of errors ch each device 
*#* parm in - nene 

*** parm out - none : 

DX,orfset msg_summary ;addz of summary msg 
Pclnte ocr2ng swrite msg to conscle 


sstep thru erricg-convert to ASci1l -_ print érr counts 


nov 
nov 
mov 
pet _10op: 
nov 
push 
call 
pOp 
Nov 
nC 
mov 
VRC 
Mov 
ine 
LnNC 
loop 
MOV 
call 
ret 


4 
pf 
ok 


@ese 8tae ve 


fee Cont Addr: 


nov 


call 
;get bas 
nov 
nov 
nov 
nov 
Cal 
Gaul 
smake su 
mov 
cmp 
ne 
smake su 
nov 
KO 


mov_. 
Check_vali 
nov 
cmp 
Bre) 
Cmp 
ja 
Cmp 


CX,MB_ maxdevst+i ;ccunt for loop - # of devs 


Bieorrtset ertrlog j;addr of error log 
DI,offset msg _ccunts ;addr of msg Sum counts 


apres ee Count £hOr errEcr tog 
BX!push CX!push bi ;save edaL, counter, 1nde.x 
Hex To _AScil 7CCnVeEES tO ASC1i 

DE Boe ext OK EX ;rest index,counter,addr 
yee ptr ror, H ;load high byte to msg 

D sbump to next pos in mSg 
Pe per [| Di |,DL toad tov eS to msg 

D ;bump to nex 
Bae ptr [DI], blank ;Ascii blank to msg 
D ;bump to next fos in mSg 


BX weiciegert Gurr addr =toe next 
Gel Oecp “lee CX and Loop Lf not zero 
X,offset msg_ccunts ;addr of mSg sum counts 

Print_String ;write msg to conscle 


ett tt ti Pt SE PELE SE EE LTE SE ERLE LSE SPSS ETE TT PS TST Et SS tT St tS EE 


CONT ADDR subroutine * 


GET 
Oe He he oh Ae aR AE eC he HE ee Eee TR he ee a HR eg ee MC HE ae Oe a OK KE KK KK KE RK KE HK 


scalled from: Main. 

;** gets base segment address for the MBB-80 
7** controller from the user at the console. 
;** parm in - none 

;** parm Out - none, updates ME contbase 
DX,o fset msg_getaddr saddr of get cont asg 
Peay ees eran @ swrite msg to console 

e address keyed in by the user 

Ci, sacs Conbut ;input console string func? 
BX ,offset cons_buff ;area for cons input 


Bee ptr (BXj,ccnbuf size ;tell Bdes size 

DX, BX ;load parm for Bdos call 
Bdos ;read from console | 

Crle Waco Oraertne atter 2aput 

re only fceur digits keyed in 

BX,offset cons_bufft+1 ;pyte 1 tells how many 
byee pce Xj,4 ;see 1£ exactly fceur read 
PaOr sept if «26 NCt &, error 

Pema teen sdigacs are valid hex 

BX,offset ccns_bufft+t2 sbyte 2 starts data 
AX, AX s;used for Ascii takle index 
aes shumecr OL Cligits to check 
SO et jhovewGeoqi. to AL for chKking 
AL, O30 *check to see 1f£ tco low 
PerOr input _ 

AL, O46H ;check to see if too high 
Peas. Put v2. *; 

AL,039H chk micgwyinvalid (3aH-40OH) 


ers 








jbe Mee a d hex 
cmp OUTH 


jae falid. hex foe 
__jmps Error_input wieecoen Tne mtadLe —~ error 
Valid hex: 
Sub Be o308 s-30H to get table index 
push BX ape VE buffer addr 
mov BX,AX : is Stee: to takle 
mov AL,AsScii Beaeley ox table LOOK up 
Pop 8&8 : tore buffer addr 
mov byte ptr{BXJ,AL Store hex back in buffer 
tne Bx sneee adage t 
loop Check valid ;gO check it 
sconvert 4 valid hex See tc a binary number in AX 
NOV DeBkKeortsat cens bueit2 :byte 2 Soe data 
Nov AH, jee erie st See 
mov Sheet 1t. to highwntbble 
shl Ae CL 
inc Ex sincrement index 
OE AH,[ BX ] wudesdgeer*cd intc Low naibb 
mic . BX ;increment alc 
mov ar {BX geo cthind oooh 
Mov Toeiet se to High nibbie 
shl aL ope 
LHC sincrement index 
One 


“4th Hee or'ed into low nibb 
sstore eines er base address that was built in ax 
mov MB_contbase,AXx 
jmps Get_cont_ ret 7go recur n 
, error ae input, issue message, retry 
Frror _input 
MOV DX, off set msoq_errinp ;addr of error message 


Camb Bran ¢ “String -write msg to console 
Gall Gelet - skip a line 
mps Get_Cont_Addr ;go ask again 
Get ~Conk Tete 
TS 


ieee ee ee ee eg 


2 GET wars lsDUPEER subroytin 

ak kak cet ARLAARSRTARE HHS AREAS DERE RAE RAE R EERE ERA ERE 
wooaltecd ircae Maan. 

Get Test Buffer::** increments pattern and loads test buffer 
;kk parm in - none 

;** parm out - none, effects global vars 


’ 
’ 
’ 
’ 


Lic pattern es one (1) to pattern 
Mov L,pattern attetn to accun for ane 
mov CX,MB_ buflen Loop counter - size of bu 
. mov BX,ortset test_bt Seer set sndes Ento bufter 
Eee 1 nov ee ee sload a byte 
oe X sbump index 
Eee eat Sle ieee, LOOpD 16 net zero 
re 


ea oe en LAE AES SS TEES ENS SRA LAE 8H een AAR EEE Xo 
Hooks (Oe ASCEL Subroutine = 

Te i, Sie E ee Lee TS Fk ATED EOD PGE RKR EN RHR KKLEN EKER RT 

/ Ja weceraens Had Pass,EEs Out,ErErer Summary. 
mem, 1C_ASCil: s** converts a hex numcer To its hex7Ascii 

2 oe parm in - AL has hex byte to ccnvert 

= oe i parm out - DX contains hi&io Ascii bytes 
meonverct Low nibble of AL to As¢ii hex digit 


’ 
e 
: 
: 
’ 
9 


mov AH,AL ;save hex # for hi nibble 
and ree OE te. ;clear hea Dl ts le nibble 
add Fy ShO)8: shandles 0-9 (908+ 4om= 1308) 
daa deci Mal adj 

adc aAL,408 handle a- ea (a1 46H Ascii) 


14Q 





daa ;decimal adjust 


mov ODL,AL , _ glow nibble Ascil fer ret 
fecnver. Hhigh® nibble of AL to Ascii hex digit 

mov AL, AH ;move to AL for daa ops 

mov CL,4 wWetecount f£Oc Shr 4 

Shr We, cL wneeeene Ht pole to lo nibble 

add AL,90QH shandles 0-9 (90H+*+4Q0H=130H) 

daa ;decimal oP eer oe 

adc AL,4QH shandle a-£H (41H-46H Ascii) 

daa sdecimal adjust 

mov DH,AL shigh nibble Ascii for ret 

pa 


2 oe ka i ie Ok I II IG OIRO IOI III CIO CIC IO IE ak IE oie eke fc ak 
suck INIT CONT subroutine * 
0A ae Ae AC ake ie 2 RC He ie SE fe 2 8 ae i CE a RE 3 IE I RC RR I i a a 2 3 a 
scalled from: Main. 
iat Cont: ;** inits the MBP controller and each device 
we Dari, 1p. - ncne 
aad coe out —- LOne Ww. a: ; 
Nov egorLset Msg lnitbegin sbegin init msg addr 
Became. PESOt String swrite msg to, conscle 
nat ialize page Sizé and mincr loop size 
mov aAX,MB_contbase ;address of controller base 
mov £ES,AX sload ES to address bubble 
mov AX,MB_maxpages ee per bubble device 
mov ES:P_Ioopsize_1lo,AL ;loopsize low Eyte 
mov ES:P_ loopsizée_hi,AH ;lcopsize hi byte 
. mov ES:P_ pagesize ede BegesSize. page Size red 
sissue reset Command t6 the céntroller 
mov AL,MB_reset_cmd ;reset mask byte 
_ mov. ES:P_¢Cmnd_rég,AL ;issue reset command 
sinitialize each bubble device 
mov CX,MB_maxdevs+?t ;count for loop-# of devices 
mov AL,O <device.# to inztialize 
FOr _2ach: 
mov §S:P_select_cFubdev,AL ;select each device 
tov wooo eGtinde reg, AE init Cmd ;2nit this device 
push a de CX¥!cush ES ;save bubble ah teas 


cali Wal “Halt f£oOr CORtTEOGLLer tO work 
pop zs! pop CX! cop AX ;restore £5,cntr,bdubble # 
ane AL snext device number 
merece For cach . - s@ec Cx, DEO tie nou Zoro 
sissu2 msqs indicating init done and test in progress 


mov DX,offset msg_initend ;init done message addr 


Gal) Peent String ;write msg to cconscle 

Gan lecrwe {Ski b an extra line 

mov. DX,offset msq_ testing ;testing nessage addr 
Se Peet. Ste Eng swrite msg to conscle 

re 


9 
SrrCooe ter eee Er OPP rr er rrr errErerrerrer rrr re rece er rote reer ss. 
oa LOG ERROR subrcutize * 
oie ti oe se oe oe ic ie ke te Re RC IC SE A fe A a oft akc REE eA i I IE KE IC ke 2 IRE 2 A 2 IE OK 
;called from: Check_trrors,. 
meg SLror: mod Slew crsOCnmeor uSe in pass frintout 
(wa Darl in - none 
sek parm cut ~ nene, effects giobal vars 
NOV a, SSEpor saddr cf errot log to BX 
inc byte ves { Bx] Jamceecne: Yo Gbrorn CCUunt 
AZ Sdene log eeeoc Overt low, ail done 
ec byte ptr ( Bx} vine =ee big, reduce to nax 
@etme: log: 


ret 
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he oh he he ee ee ke he ie ae he Hee Be A ee He KR KH HE HK KARR EH 


«ok PRINT STRING subroutine we - 
2 oe I IC a CII I oR ic i a a ie i i III III OIE Ca a a a ea a ae oe Rk a ie oe a IE a 


scalled from: Close_Up,End_Pass,Err Out 
: Error Summary,Get Cont Addr, 


: inne eecnw, Natl, Set Up. 
Print String: ;** prints Luffer addressed until '3* hit 
;** parm in - address cf buffer in DX 
ne ar peee out - hone : 
mov CL,Bdos_pstring ;function # for Bdes call 
call Bdos ;call Bdos and print 
Gala CELE s;skip a line 
ret 


ole ok te I ACO RICO ik kek aa OI i ike iii II a a aa 2 RI ie I 
: PUTCHAR subroutine , * 
2 fe 23 a ae a ae I ie fe ke oe ie a a IE a ICICI OR 9 2 2 a IR a ake te oe ag ke I 
{Gate Leq scom: CELT. 
Paechar: s** writes character from AL to console 
;** parm in ~- output char in AL 
atepalcm Out = Che , ; 
MOV CL,Bdos conout ;function # for Bdcs cail 
mov ODL,AL ;Load char to Bdos reg 
call Bdos ;call Edos and send 
ret 


’ 
CTErrr rT r+ eererrrerr eer rer eEreCerSCee Eee PSP eT Eee TELE TTT eS S 


ok READ PAGE subreutine x 
oe fe 2 2 2 2 fee ie ke fe 2 ft ak ae fe fe SER a ae ee ei a fe I I A A Re i OC a fe i a ee 


“called fron; Main. 
Read_ Page: ;** reads a page into test buffer from bubble 


- oe spacm in = nore 
s** parm cut - none, effects global vars 


;select seks number 
A 
ES 


nov eMB_contbase ;address of controller base 
MOV Bene. ;lLoad ES to address bubble 
mov AX,curr_pagé_no ;current page number testing 
mov ES:P_pagesel 10,AL ;page select lo Lyte 
mov ES:P_pagesel hi,AH ;page select hi tyte 
sselect bubble device and issue read command 
mov AL,curr_bub_no ;curr bubble number testin 
mov ES:P_select_kubdév,AL ;select current dev 
mov ES:P_cmnd_reg,MB_read_cmd ;issue read FIrFro 


push ES. ;save ES 
call Wait Wwotee sor ecOnerOlle= £O work 
5S s;restore ES 


fe) E 
sread Fron MoBbe FEO Urutter into test buffer 
mov CX,MB_kuflen meacunt 2£OE JOoOGcE=buftier size 
sb hovers Oedset test buffer ;set index into buffer 
ead_bytze: 
mov AL,ES:? rdata_ reg 
nov Rem At: 
nie X 
ESE Read_by*¢ 


;read a byte inte accun 
cad accum into buffer 
ncerement index 

CeO OOD Sf onet Zero 


oe 
9 
a 
ft PF thet tee eeSES ESE SELES SLSES SESE SF SSFSESSS SSFP SCS ES SS SS SS Ft SS Fs 
™ 


SET OP subroutine 3 
Tee EC ES CSCTOCSL SE OCSSL SS CSCS SCS CPCS TC CCC TCC TTT TT TT TCT TTT TCT TTT TTT 


scalled from: Main. 


@eweeoedgewse 


Set Ur: ;** inits variables and issues signon msg 
ga parm an - none 
sw= Darm out - nene, effects global vars 
Gaul) Cole ;Skip an extra line 
Sant Celt | 3Skip an extra line 
NOv ODX,offset msgq_Signon ;signon msg address 
Sah Peene Sce ing ;sWwrite mSg to conscle 
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mov DX,offset msg_version ;version msg address 

Gam Print String swrite msg to console 

Same, Crise ; ;skip an extra line 
sinitialize all variatles and flags 

mov newpass flag,1 ;flag indicating new pess 

mov curt bub_no,0 scurrent bubble # to 

MGV | Ciltmr wbageanc,0 ~:CUurTeDnt page # to Q. 

mov pattern, ;sinitial test pattern is 1 

mov pass_no,1 ‘initial pass is 

mov errptr,offset errlog ;addr of error log 

ret 


% * 


ac $ 


= 
a) 


mov 
Mov 
see zero: 
nov 
and 


2 
Senge Dusy: 
mov 
and 
Ain Z 
ret 


* 
2k 
> 4 
Write Page: 


sselect 
MOV 
Nov 
mov 
nov 
nov 


Si he 2k ie he oe 3 sic 2 of 3K ie He te he He ke He ie he HK HK HK HK MK RK KH KKK HK KKK KK KKK KKKK K KH 


subroutine * 


WAIT 
OH 3 oe 3c He ee A He Ae a 2 ie 2c ie 2K he Sie he he he A ee eK HK MEK Ke HE I KK KK HK KKK KKK KK MK KKH 


scalled from: Init_Cont,Read_ Page, Write Page. 
s** checks status cf MBB contrcller for busy 
;#* keeps checking (wait) until not busy 

s*™ Darm in - none 

== Dar meout => none 

X,MB_contbase j;address of controller base 
ES, AX sload ES to address bubble 


AL, ES:P_status_reg ;get status register 
AL,MB_busy_check ;1is it all zeros ? 
See zero so,keep checking for one 


? 
a 
Alco s Po Status Leg 
AL,MB_busy_ check ;s 
Cont_busy caf 


gét status register 
if busy, and to mask 


9 
ee 
busy, check again 


eM Me Ke eH HK KK RK KKH KK KARHEK AK KHKKKAKKKKHKKKAKKAKKKHK KK KKH KK 


TE PAGE subroutine * 


WRI 
Pete SPS SSS SEE PEE SESE SE LS ECE E SES SES ESSE PE ES ES ESE EES SETS SETS SS 


;Galled from: Main. 
;** writes a page from test_buffer to bubble 
swe Palm sn = none 
-== Dabw cut = nene 


page number 


AX,MB_contbase j;address of controller base 
ES, AX sload ES to address bubble 
AX,curr_page_no ;current page # testing 

ES: P_pagesel_1o,AL ;page select lo Lyte 
ES: P_pagesel_hi,AH ;page select hi byte 


ewrace from test buffer into the MBB FIFO burter 


mov 

mov 
Write byte: 
mov 

NOV 

ages 


loop é 
s;select bubble number and write FIFO 


nov 


CX,Ms butlen IcCMMe TOE LOOp-OULtrzer Size 
BX,offset test _ buffer s;set index into buffer 


;byte from buffer tc accum 
Teel ce mde yce COMBE FIFO 


ae 
ES: P_wdata_reg,A 
X sincrement index 


B 
Write byte le Came Ke, sock Be 1G cue SO 

; ites sou DuUbD ic 
AL,cCurr_bub_no _;load accum w/ bub# 
ES:P_seITect_rEubdev,AL ;load bubble device # 


NOV 
mov. ES:;:P_cmnd_rég,4B_write cud ;issue write FIFO 
call Wait wale com. controller to work 
net 


weve 


* 
om 


DSEG 


© eB A AR oe he ke she she he Ae ae Sie he 2 oe i a ie he eA A HE ee ee eK MK EK HK EK KH KK HK MK IH HK ve 


DATA SEGMENT AREA ~j 


Oe he he he he A 2 ae OK ee he HC ie he ee ee i he Me Ke HH HK HK HE HE RK He HK IK KE KE OK 
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cons buff 
curr_bub_no 
Ccurr_page_no 
errleg 

me EECL 
MB_contbase 
Bee bass_ flag 


mSg_ counts 
msg_dcenebub 
msg _donepass 
mé¢g_d_pass 
msg_endtest 


msg_err 
msg_e dev 


msg_e_ page 
rsg_e_pyte 


msg e wrote 


BSg_e read 
mSg_errinp 
msg_g¢etaddr 


msg_header 


nsg_ seca 


msg _initen 
msq_ signon 


még_summary 
msg testing 


msq_vérsion 


ESEG 


4 Cutt py 


Be As ep a a Dy Ds Qs 4 QP PP Ds Du OA old Ou Gol ups pu ult pur 
SOoSSTROSCSOTSRCOOSTOSTOSTSTVTSTOrrOrrrreororrrrruw 


0100H sleave room for base page 


UE, Q1E, O2H,03H, 0O4H,05H,06H,07H,08H,09H 
‘for "AScii 3aH to 4OM - invalid 

dad pet ,0CH, 0d, 0eH, Of8 

oan _sgize sarea for cons string input 

sbubble device # 0-7 testing 

;bukble page number testing 

vo stable tor dev error ect 

spointer to eérrlog - inde 


ty 


QO0008 ase segment addr fer “BB-80 
1 jtlag fer indicating new pass 
1 ass number 


1 est pattern 
SE oueten SEutfer to hold test data 


data area for console messages --------- * 


ee eta) 


' Dene with a bubble.$! 
‘Done with PASS ! 


2 
‘ge 
'kJser terminate 


Ss te pe OC 
returning to CPAMES 


8 invalid Paes digits!!$ 
la ee 

$s fcr M4BB-80 ccntrollér.' 

ose ts an hex (6 digits, Sasa CRaondy) 


"Bubble Page Byte Wrote Read$* 
Dice aaizang tie .control ler. .5* 
contrciler 1s initialized. 3! 


$* 

**XERRCRS ses exactly 4 ee entered, 
° 

fr Us ole eks Segment ease addr'* 
es 


te MBE-80 CP/M-86 DIAGNOSTIC TEST **$! 
'Total errors for each device (0-7):5! 
'Yestande.<«Hit aby Char (& CR!) ! 

to step after this pass. oe 


feeneaie= aa Mode eee 17. O38 
0 ENCMD to f£2ili last address 


ok eo ee ea HHH ond Of Variables #9 aa ak IK oe a IR aC KE 


Me Me he ee ae eK Oe he ie She ie ee oe KK KK HK KRM KK KKK HK KKKHK “eas osas 


°« 


MBB~80 CONTROLLER AND PORTS 


SCTTTTLTTCLTTet Tt Pit Ft StF tS kt EE EE SS SSE tS SS tS S aan ae OU ee 


b pagesel lo 
P_pagesel ail 


1 sls byte for page select, (0 
1 “ms ay Eee 208 Zage selec .! Oy 
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Eecmnd reg mS, 
P rdata_reg jg 10) 
Dp wdata_reg rb 
P status r3 rb 
P_ pragecnt_lo rh 
pe osc3 igual 30 8, 
P_ lcocpsize_lo rb 
P iccpsize_hi ame) 
rw 
P_pagesize reg rb 
Ew 
P_sélect_bubdév rb 
Peint flag equ 


3 
o %& 
4 


END 


P_select_bubdev ; interrupt flag 
skemkmeeRKR Cod of Ccentreller and Port definitions ** ****4 xx 


78 
PEE EE PEPE EEE EE EER 


;command register, (74) 

;cead data register, ei 
swrite data réegistet (4) 
;status Gegister, (5 

wes Dyte tor page counter, (ny? 
- 1S Qeoiecs £05, Cage cntr, (7) 
;i1s byte for minor lcop Sz, (3 
“ms 2 bits for min lco Pat 5, 
; internal use (page Fos) (A,B 
Ree size ES da ene 

;TI use only, (D 

stwo uses; Sal Baie le dev (FI 


ane en ee ee ee te YT EK AEE EERE A ERES eH 


ram DIAG86S - 
A He i a 2h 2 fe SEE IE I OE I 





AE PENDTE C 
PROGRAM LISTING OF DIAG864.A86 


FILENAMES: Pascal = MB.DIAGS6M.TEXT 
CP/M = CIAG86N§.CMD 


ate op sha she fe ee ee He eH 3h ak Ee ae eK oe ee i eK he eC HE I eK EO EK HK KK OK RK KE KK 


8086 DIAGNOSTIC TEST FCR PC/M MBE-80 BUBBLE MEMORIES = 
ode 9 ie 9 ie He 2 aK Ae Ae 2 He 8 he Re fe he he AC RE Sf Re RR A A FE RCE IE I I A eK CK 9K Ne 3 He 


CCNFIGURATION: 
MOST —- Intel 86/1248 SEC, 20 address lines, MDS sore 
Pee on 86/124 GenvicEting to low 8 bits 
a baa. 

MBB - Interrupts enabled if using vectored interrupts. 
Interrupts disabled By disconnecting the inter- 
es Fureer on the "EE Seara™2r net vectorang 
interrupts. Multi-page mcde, 20 address lines. 


This cue writes and then reads a test pattern in each 
sector of each bubble chip on MBB-80 boards. Errer 
diagnostics are printed as errors are found. An error log 
is printed at the end cf each pass. Testing is continuous 
until any character is keyed into the console. 


The MBB-80 controller tase address is read into variable 
'MB contbase’. MBB-80 address select pins must correspond 
tec this address. This program uses memory mapped I/0 
through «he base address. 


MHA KK KK RK KKK KK KKKKK RAK KKKAKAKK KKKKKKKKKKKKKK A EKKKHKKKK K 


Jeffrey Neufeld and Michael Hicklin CS-03, Thesis « 
© le aie i Ee ae ie ke he IS EI IIE II RE OE a I IO IE I CCRC eS a aR ie Re eke ke 


** Edos functicn numcters fcr calls *® 


SC Ge Gt Ses* Ss eGee Ge SGFCasePGeGe PGSste GSsewtsTe GeGtewsewsesGeGeGetse Geese Geese Staoewe Se G8 


Bdcs_ conbuf equ 10 ;console OE string function # 

Bdcs_ conout equ 2 ;conscle output char function # 

Becs constat equ 11 ;sget console status function # 

Bdcs pstring equ 9 eee SeGLAG Until 'S' Eunction «ft 

Bdcs reset equ 0 [Gly Ne OOwreset to CCP Function + 

s® 8259a PIC port assiqnments 

PICpeQ equ QcOH 38259a port 0 

Picci equ O0c2H -aeo0a  pOrt 7 

p= MEE characteristics * 7 

MB bctuflen equ 144 Jette =  endgen LOL Sec. cr 

MB- int mask equ 1111110128 ;mask to enable MBB interrupt 

4B int type equ 17 mee liGmesels0 as defined to - 
~O2ocemele on FONSIni tees 211 
;generate anterrurpts over this 
;: e. 

MB maxdevs equ 7 bubble devices are #0-#7 

MB_ maxpages 2qu 641 ## of oes On each bubble device 

MB maxsectors equ 80 ;¢ Of leg sectors on each bub dev 

MB fages_ sec equ 8 ;# OL Begceece logical sector 

MB fagesize equ 13 ;Cubble device page size 

MB_skew equ 12 ;skew for page translaticn 
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-* MBE command masks and status masks * 

MB busy check equ OO1TQ0Q000E ;cont busy? status check (20H) 
MB init_cnad . equ QQQ00001B ;init the controlier lett 
MB_int_inhibit equ 1Q0Q000000B ;int inhibit/reset mask ( sell 
MB_chkint_mask equ 10Q00Q00Q000E ;mask testing if int set (80 

MB multi page equ QQ0Q010000B ;multi-page mode command (10H 
MB_ read_cnd equ OCOTOOQI0E eee page read command (12H 
MB reset_cnd equ 01000000B ;reset the contrcller (40H) 

MB write cmd equ OOOTO1T00E ;multi-page write command (14H) 
;* Miscellaneous equates * - 

blank equ 020H ;Ascii blank ; 

conbuf_size2 equ 80 3;size for input burfer fer ccnsole 
er equ OdH sASC11 carriage return ccnt char 
true equ -1 2£Or cOndaraona lL assert 

false equ not true ;fcr conditional assembl 

af equ QauH ;ASC1i1i line feed control char 
yvectored_int equ false ;this ccntrols the assembly. 


mk 
pf 
oh 


BaeoeseBGoesv_seese wo 


Coe 


I 


strue=use hard interrupt to CPU. 
sfalse=poil int reg on MEB. 


eH he HK whe HE HC he ee KC HK KK KH HA KKAHKAHKKKAKKKKKKKKKKKKKKKKKKKK KKH 


MAIN PROGRAM -— CRIVER a 
2h fe he ake ae eR he te i a ee 2 i Ae a he IE a 29 fe a ke aie ae ie ae I a a ke i OE a a OK 


CSEG 


AG86M: call Set_Up Jace lnictidlizatlon 
Gall Get Cont Addr sget Ease address fcr MBB-80 
eat! Inze Cont sinit the cont and devices 
Téest_loop: 
Gael Geerhest Sutfer ;get test pattern, £111 buff 


Gall Write Sector swrite a sector to bubble 
call Read_Sector ;read a sector from bubble 
Gall Check Errors scheck errors in write/read 


sadvance to next sector in deéevice,see if last sector 
anc cCUFr Ssector_no ;increment current sector # 
cmp Curr_~sector_no,ME_ maxsectors fast Sector 2 
jnz Test_loop ;if not, test next sector 

swaS last sector,advance tc next bub dev on board 
mov DX,offset msg_dcnekub ;addr of done bub osg 


Capra Prant. Strind ;swrite msg to conscle 

Cmp curr_bub_no,MB_maxdevs ;last bubble on board? 

JZ Doné_ pass sit sc, done with a pass 
;prepare to test next bubble device . 

InG ‘Gillen. DuUbeAnO ;1f net, increment device # 

mov curr sectcr_no,0 ;set sector # back to zero 

LOG. Saepe ;ptr tc next entry (dev) 


mop Lest. 160 _ . 3g0 test next device 
sfinished with all devices on board, pee De summary 
;prepare to run another pass 1f not stopped by user 
Ccne_pass:; 
Sati ERGOr Suntan y ;PpLrant error summary. 
Cail End_ Pass ;end of pass hcusekéeping 
;see if anything keyed in _at the console 
tev cCippaos CCn=tat ;fumction # for Bdcs call 
Sa) BdOs (eal EGGsS*tO Jet ccpnS stazus 
cmp AL,01 ;O1=char keyed in, 00=nothing 
Zz Done_test | ;something keyed, user quits 
;usér wants fo continue . 
mov. OxX,offset msg testing ;addr of testing asg 
Cole ep cane wot flo ;write msg to conscle 
jmp Test_Toop ;keep testing 
;user wanted to quit the testing 
[one test: 
call Close Up sdo end of run So Sse Ene 
mov cCL,Bddés reset 7Buneraon WLOr Badcs call 
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ameter to release memory 


mov  DL,O r | : 
li Edos to terminate prog 


’ 
call Bdos : 
$d RK end of Main PLOGram *RRKK RK AK KAR KEKE K AE 


pa 
ca 


Te RTSCSCLSLOOCSOCOSCOSSL SST C SLSR ES STS PSE Se STS Te SS Se tee tt et te Ss 
* BDOS (CP/M-86) subroutine * 
CETTE TTOCCLT EST TC SCCCoCSCSOSCCSCSCL SSCL SS TPS PLP S tte SST Se ee TES SSS Se FS 
scalled from; Close_Up, Get_Cont_Addr, Main, 
: Print String, Putchar. 
Bdcs: sex entry to Bdos_via_ software interrupt 224 
s** parm in - caller leads regs as per reéeq 
Ae Darleout = as A geet by Edos returns 
int 224 -8086 software interrupt 
ret 


Sese soeyuseDCoesse Seve 


s@¢ee 


Serre st Stee et SSS SESS SSS SES SEP SSE LSE EL SESS SESS SS SSE SES ES ESSE tS SS | 
” 


tied CHECK ERRORS subroutine 
2 AI SC oe fe 2 ee 2 fe I RII OIC FIR AF IE I ACI IO IIE I 
;scalled from: Main. 
Check Errors: ;** see if read what was written 
ae Care sen — none 
-+* Darn eout = none : 
mov AL,pattern spattern to accum for manipul 
mov CxX,8B cF-uflen ;counter £or Loopy thru butter 
mov Bx,offset test_buffer ;index into test buffer 
Test_byte: 
cmp nee 7 AL s;ccmpare buff to pattern 
jz ood_test ;if good, check next byte 
push AX!push BX!push CX ;save ofa ee addr/cntr 
Gan. Her sour jee Sead, Palin cr ror 
Gael EOaeBrror : OGeen ro: 
Hopmcxpop BX'DOp AX S;Festore cntrsbuftft addr/patt 
Gcod_test: 
Ger .ox : 
loop Test_byte : 
ret 


increment index . 
dec CX and loop if not zero 


3M he AK Me he He He ee He he Me he ee He ee he eH Ee he He HE eh hee ee he ee MK ee ee eK 
x 


Hw 
‘s LOS F240 Po SUDEOUT LN © 
PEEP SE OSCOOCS ESOS SES SSSCCCSS SC CSSSOSLSSL OSS SIS SS SS SST ete PP Se eS 
"calle@e frrofe Main. ; 
Clcse_Up: 7** reads garbage from console,issues goodbye 
j2 eparkin = none 
-** parm out - none 
sclear stop input characters from the conscle buffer 
mov CL,Bdos_contuf ;input console string func# 
Move Ex, OLESet Cons DbUufE;area for ccns input 
mov byte ptr (BX ],Gonbuf_size;tell Bdos buff size 


e 
i] 
e 
9 
e 
9 
° 
9 
° 
9 


mov DX, BX ;1cad parameter reg fer Bdos 
meat. 310s sread the console 
;issue goodbye message . 
eae, \Cro Lt ;Skip extra line | 
nov DX,offset msg _endtest saddr of end test asg 
Care Print. String swrite msg to conscle 
re 
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ok IC I IK A SR a I RR IIR ROC RC ORE ke CR IC I I IC RR IE I a 3H 9 CE 2 a 
< o COMPUTE DAGENO subroutine * 
POPE TT eer rT errr Terre everett eT Tt errr et ee Tee Ter ree 
scalled from: Read —Sector, Wea ten SeCLlo Lis 
Compute Pageno: ;** computes 1st page # for a given sector 
~ patie tie - HONE, works On CULE SSeECtcr no 
rie peg cut - nene ae curr_page_no 
fone Anke, A sset AX to zero 
cmp AL,curr_secter_nc, is skew sector 0 2 
TZ Store _page if SO, no trarslation 


Kor Gk, Che elear CX for counter 

nov CE, Giereseceer NG wGntr £Or translate loop 
Add_skew: 

add AX,MB_skew # Of pages between sectors 

Eile ean Carr 


C 

sbb AX,MB maxpages ;smod tc # 0 pages 
jae Dec sector ;ju Mp if positive (CF=0) 
add AX,MB_maxpages j;went neg, add back # pages 
Lec _ sector: 

loop Add_skew ;dec sector #, add skew again 
Stcre page: 

Wve cuss Ppagerho,Ak ;Store page number 

ret 


-e fet +t SS PSE SE SES SSS PSSST SEE SEE SRE SES SEE PEL SE SESE SSE ES SSE TD SF ® | 
“ 


oie 
* CRLF subrcutine 
PEP SELESOCS LSE SS Cece TSS TCSOSSOSCOSOSL ES SS EPSPS TPES ST SS ttt Ses 
;called BEOS: Close Up,wGet Cont Addr, 
-Ena.) Pass,ln2e Cont, Main,Print “String, Set_ Up. 
if : 2ke Eends carriage return, line feed to cons 
2 2 parm in - nenhe 
re Beere out - none 


wSeeeedsdsie ge we 


2) 
4 


nov tGacrlage Leturcn char 
Gali putcbar swrite it to console 
nov AL sline feed char 

ach at ‘write 2 to censole 
re 


RM He Me he He he he HK Me KK MK KK RHE KKK RK KAEKKEK KKK AK KKK HRKK KEKE KKK 


* 
al END PASS subreutine * 
Heh ft ie i oe he 2 2 te he a 2 ie te oe IE fe ae he ee a Re RE A i ae a AC a a a fe ake a ie i 2K 2h ae ie 2 2k 
[ea Medviron: Hwain. 
End_Pass: ;** performs end of pass housekeeping 
:** parm in - none 
:** parm out - ncne, effects global vars 
sconvert pass # to Ascii and print artéer pass message 
mov L,pass_one ;pasS number to accun 
Can dex To_Ascii ;convert to Ascii 
nov Sore Sao ns pass; addr of pass # in asg 
nov at Des CBR D DA jload high byte to. Msg, 
2yC ump to next position in msg 


NOV Pee [BXJ,DL’ ie low byt¢ to msg 
nov ; ee set gsg_ donepass ;addr of done pass msg 
carl Brant aofeing ;Write BSg to conscle 
ae (ele ft Skip a line 
sinc pass number and reset ali variables for new pass 
inc pass_no ;add cne to pass number 
mOvV ge ee See oe new-pass flag cn 
NOV Pelwr.. 34" reset to oubbie oe 0 


ney CUET pup. es poke O*:reset sector number to 0 
mov errptr,offset oeetca sreset addr of error log 
ret 
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o & 


He a ai he i 2 2k KC I A eee ie AE FH A He ae eK RK EK EK KK 
4 


OUT subroutine ; 


ERR 
oe SI SA AE RE CE I A Ee ei I IC CA I A A i 2 a a a ee a 


scalled from: Check_Errors. 


mec Out: -** issue an errcr Nessage to the ccensole 
a s#* parm in - BX addr in buff cf byte error 
-** Darm out - none, effects global vars 
push BX ! push BX ;save addr of error twice 
cmp newpass_flag,1 ;1is this a new pass ? 
jmz PEt err Eno e, sDELNt CLLrOE now 
mov newpass_flag,O ;turn flag off 
mov DX,offsét msg_header ;load addr of header 
Gan. BeLicost ring sprint the header 
‘put Zeros tato all errer eeunts in the log 
mov CX,MB_maxdevs+1 ;count for # of dev to loop 
Moves Oo nrsounCLtlog -addr Of error log 
werz log: 
mov Bee Petimeei, 0 seledG log entry errcre count 
Lc. ;bump pon aeer to next entry 
a ik@opecir log pace Gx and dioep if met Zero 
meer: 
- mov AL,curr_bub_no ;bub dev # to accum 
Call fex To ASciiz PeOnVere tO ASCI1 
mov msg_e_dev,D# ;smove in high byte to msg 


° 

, 
, 
e 

9 
ox 
) 
e 


mov msg_e dev+1,CL ;move in low byte to msg 
sload page number of error 


mov. AL,byte ptr. curr_page_noti;hi byte cf page# 

eal] We xeto Asei1i FeonVere tO ASGil. 

mov msgq_e_page,CH shigh byte to ms ied 1) 

mov msg e€ page+1,DL ;low byte to ms i ae 1) 

Hov. Alb powese Der Curr page so ;lo»byte ci page# 

Gatt POxE LO UASGLa feecnVverm: Oo ASC. 

mov msg_e_ paget+z,DH ;high ORES Ee, Boy {o29 2) 

mov fe dai esa ce eee slow tyte to msg(dig 2) 
;compute and load byte offset of error in page 

Eos BX srestore addr ers Lyte offset 
addr_buff equ cf£fset test_buffer ;fcer ccmputation 


sup "8xX,aadr burr ;compute err offset in buff 
mov AL,8L a ;offset to AL for ccnversion 
Gail Hex To Ascii GOR VEEC tO.aASceLs. 


mov msg_e€ byte,DH smcve in high byte to msg 

mov msg_¢ bytet+1,DL ;move in low byte to asg 
;load pattern that was written and what was read back 

mov. AL,pattern.. ;lLoad pattern just written 

Ga. Hew LO ASC1I ;convert to ASCil 

mov msg_2_wrote,CH j;move in high byte to msg 

mov msg_é_wrete+1,DL ;m0ve in low = to msg 


POp Bx srestore addr cr err offset 
MOV jAL,( 3x ] _ slcad byte just read back 
Gali Hex To Ascii 1con vere tO: ASCl1 

mov msg_e_read,DH ,;mcove in high byte to msg 


mov msg _e read+1,DL ;move in low byte to ms 
mov. DX, otfset mSsg_eérr ;addr of total error msg 
Cort rane: String sprint the errer message 


— we fe 


Ae ie HE ae Me He ee Ae he ee He IK ie oe HE eK eK ie he SK KK KKK KKK KK KEKHK KKK K HK 


ERRCR SOMMARY subroutine x 


We oe ie ke He eK AE Ok ee ee he He FE oe eH Me ee MR HK HK HK EK KK KK IH HK A KK KK HK 


"calredq =ron? Main. 


Errer_Summary: ;** outputs summary of errors cn each device 


a. DaEm in = nene 
= Porn out - none 
Nov ©) fset msgq_summary saddr of summary msg 
eal, Paertne String sWrite mSg to console 
moeoD ehil =sricg-converct to AScLi -_print err counts 
wo.) @opibe taxdevs+i secunte fror loop - ¥ of devs 


ve 












mov Bx,otfset errlog ;addr of error log 
4 mov DI,offiset msg counts ;addr of msg Sum counts 
me LOOP: 

— POY Seed seis count from errcer ao 
push BX! push CX!rush DL ;save addr, counter, index 
call Hex To Ascii sconvert to Ascii 

poe Dut PoP CX! poo BX ;rest index,counter,addr 

mOV Dee Dor for], DH -load bagh byte tc msg 

IC : 


sbump to next pos in msg 
te ptr [DIj,DL ;leoad low byte to msg 


mov 
seme. 0 | sbump to next fos in msg 

mov eh ptr (DI),blank ;Ascii blank to msg 

ime. » ;Dump to next pos in @m5g 

inc BX sincrement buff addr to next 
Loop SS ce sdec CX and loop if not zero 
mov X,offse+ msg_ccunts ;addr of msg sum counts 
Cav Pra. String ;write msg zo conscle 


ret 


sent 


oH ft te Me he A Ae Ae ae ie he ae She a ae He ae fe he ae He ke He Me ie fe ae ee He Ae oe Ke oe i ee EK KE ee KK KK OK KE 
* 


: GET CONT ADDR subroutine 
ote op ft Ate cai 2h Ae ie 9 i iC 2k A I ke 2 SR He KR KH RO I AO OK OR FOR IO KK 
‘ca mled L£rom: ain. 
sx** gets base segment address for the MBB-80 
s** controller from the user at the console. 
;*= DaBePin - none 
sk Darm cut - nene, updates MB contbase 
nov DX ,0 fset msq_getaddr saddr of get cont msg 
Gall Pen: -Striadg ;write msg to conscle 
sget base addtess keyed in by the user 
mov cCL,Bdos_conbuf j;input console string func# 
Mey Be,OLtset ccns buff ;area for cons input 
Nov Dyce ptr{Bxj,conkuf_size ;tell Bdos size 
Die, BX Jhoad. farm fOr Baos call 
call Bdos stead from console . 
Gal Cert eee a line after input 
;make sure only four digits keyed in 
mov BX offset ccns_burf+1 ;byte 1 tells how many 
cmp byte ptr{Bxj,4 ;see 1f exactly fcur read 
ime wwhELTOEr Input 8 ;2f£ nct 4, error 
smake2 sure all fcur digits are valid hex 
mov BxX,offset cens_bufft+2 ;byte 2 starts data 


Get_Cont_Addr: 


Sore AKA X ;used for Ascii table index 

mov CX,4 [nuinwere Of digits to check 
emeck valids ae 

ov are l Bx ;move digit te AL for chking 

cmp AL,U30£ ;check to see if tco low 

Jb EeaOme 2 Nn put 

cmp AL,O46H | scheck  cO See Lf too high 

ja Pear Tipu t . 

cmp AL,039H ;Cchk mid-invalid (3aH-408) 

jbe valid hex 

cmp AL,947H 

jae Valid hex rt ae 

Peyaps ESrOr aineut 72t IS ta #he aiddle - srror 

fatid hex; 

Suto “kX 703 9H ,730d to get table index 

push BX s;save buffer addr 

mov EX, Axe | *AX 1S index to takle 

nOV AL, ASCii_tablef BX) ; table look up 


pop BX ;restore burfer addr 
nov 2 Der, Sk j,AL  sonere tex back in buffer 
the 3 ‘ Aono an Gla poise 
loop Check_valid ~ 500 Gheck it 
sconvert 4 valid hex digits to a binary number in AX 
mov BxX,offset ccns_Burf+2 pbyte 2 Seanrts data 


mov AH,[ 3X ] SOcemrrr Se. o1G2t 


lon 





mov CL,4& A osinege sabi ele) olebiofoy ss pip oe wma 


Sshl AH,CL 

mic Bx sincrement index 

oi AH,[ BX ] -2nd dig or'ed intc low nibb 

inc Bx ‘increment index 

mov ded sget third bles alee 

mov CL, wehiftt 22 to high nibble 

Shi AL,CL 

inc B% J Fees Tels index 

OF ee ee MimdeGg OO’ cd Into low nibb 
;store cont er base Aaivcas that was built in AX 

mov MB tholier base 

jmps Get_cont_ret ;go return 


;@rror in lfAput, issue message, retry 
Error Sin pug: 
mov DX,offset msg _errinp ;addr of error message 


call Print Tors swrorite msg to conscle 
Gai UGE et “skip a line 
jmps Get_Cont_AaAddr ;go ask again 
Get =e e Fore: 
re 


PEP ESESCLOSS CECE CL SSS SSCS SEE ST SEEPS ESTE eT SST eT SS SEL SST SLs SS 

i GET TEST BOFFER subrceutine . * 

ease swe os SES CGS Ak PESO Se EEE SES eee A RKES KERR REE 
scalled frcem: Main. | 

Get_Test_Buffer:;** increments pattern and loads test buffer 
= i 2k parm in - none 

;** parm out - none, effects global vars 


e 
4 
’ 
® 
9 
’ 
® 
9 


Line freee ee one (1) to pattern 

mov attern attern to accum for manipul 
mov 4B burlen OOF counter - size of buff 
mov ;oftset ee: Ge index into buffer 
nov oat : load byte 

pi ple: ; dump aeyar 

meee Pell dec Cx, HOOD. 2c Net ZELO 

ze 


ES IG AY ih FS tdi ch allele laladadiaadededadiat 
‘4 HEX TO ASCII subroutine 
Ee eee ee RGA ALTR RAMEE A EERE ES ARLSHE TERE RAE EER ERE EERE REE 
= scalled from: End Pass,Err_Out,Error_ Sane 
Mee TO ASCii: ;** converts a hex number fo its hex Asci2 
2 ok He parm in ~- AL has hex byte to cenvert 
= 2 parm cut — Dancontams hiclo pects bytes 
;convert low nibble cf AL to Ascii hex di 


® 
 ] 
e 
: 
: 
’ 
s 
% 


nov AL ;save hex # for z “Mayne 

and ALS OfH sclear high 4 bits lo nibble 

add AL,90H shandles 0-9 Penson OL) 

daa ‘decimal ad 4 

adc AL,40OH -handle a= » (41 H-46H Asc1i) 

daa “decimal aanjus <) 

NOV AL -icw mepbie ASCi2 for ret 
mcOnvert nigh nibble cf AL to Ascii hex digit 

mov AL,AH ;smcve to AL tor daa ops 

10ovV Sa 7Sét count for shr 4 

Shae ALCL wooo te aa nipple to lo is 

add AL,90H ;handles O-9 (90H+40H= 1358? 

daa decimal adjust 

adc AL,4OH handle a-f (41H-46H Ascii) 

daa sdecimal adjust ae: 

oy DH AL -high nibbl2 Ascii for ret 

re 
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o KRAMER RK PES ee SESS EEE ESE SEES EEL ELSES EEE EEL ES SESS EEE EE TSE SS 


¢ TNiG CONT subroutine * 
0 ie I ie a A i IC Re 3 oh fe ie a AO a I CR FE aR fC a 2 i ee a te Ee 
scallodg from: Nain. 
moat Cont: sx* inits the MEE controller and each device 
= sxx parm in ~- ncne 
—— Demme out - none  . a 
mov. DX,offset msg_initbegin ;begin init msg addr 
~ Gall Prent Strimg swrite msg to console 
sinitialize page size and mincr loop size 
mov AX,M4B_contbase j;address or controller base 
mov ES,AX ;Load ES to address bubble 
mov AX,MB_maxpages ees per bubble device 
mov ES:P_lIoopsize_lo,AL ;loopsize low Eyte 
mov ES:P_loopsize_hi,AH ;loopsize hi byte 
mov 2£S:P_pagéesize_reg,MB_pagesize;page size reg 
sissue reset Command to the ccentroller 
mov AL,MB_reset_cmd ;reset mask byte 
 .mov_. ES:P_¢€mnd_rég,aAL ;issue reset command 
sinitialize each bubrlie device 
mov cCX,MB_maxdevs+1 ;count for loop-# of devices 
mov AL,0O saevice*€.*to ihitaalize 
Fer_each; ; 
mov ES:P_select_Fubdev,AL ;select each device 
mov §S:P_cmnd_reg,MB_init_cmd ;init this device 
push ee CX¥{push ES ;save bubble #,ccunter,ES 
Gall Wai ieee for controller to work 


Hop Seo Per c..  LOp ak JESsrore ES,cntrE,bubble # 

Ame 80 AN, shext device number 

loop For_each ;dec CX, Bos, if not zero 
est in progress 


sissue Hee indicating init done and 
mov X,offset msg initend ;init done messagé addr 


Cam “Pesnt Strang swrite msg to conscle 

Cal Cit ;skip an extra line 

mov DX,offset msg_testing ;testing message addr 
eon PEt SEUNG swrite msg to conscle 

rea 


aes 


SEPT EOSSOCPLCSCSL£SOSOS LCE S ESET ESE CS SS e re TTT e Pe TESS SCS CSCL LC’. 
* LOG _ZRROR subroutine * 
TeEPTEPLOCLTPSELSO£SSS SL SE TSS CSCSSCSOSL SSO SCSLCOCSS OSS SS SESS LSS SCL SLE SS 
scatledareo.h: Check ELEOrs. 
megesZLor;: ;** leg the error for use in pass frintout 
;** parm in - nene 
ses parm out ~ nene, effects global vars 


sewe @ 


mov Hiern per -addr Ser eor Log to Bx 
inc byte P me) Bx | ;add cne to error ccunt 
nz done log ;1f£ not overflow, all done 
2c byte ptr [Bx] sinc tco big, reduce to max 
dcnée_log: 
ret 
2 ie it of ie ie ie 2 fe kee ie ir ac ke Se Re Sea II CIC I ak ici a a aie aie i a fe IC ic a 2 a a a ae 2 oe oe 
= PRINT.STRING subroutine * 
oe CRE ae ie fe RC a i ae 2 ee I 3 2 i A A OR a a oc fe a ie a ie a ae 2 ae 2 ke 2 


ecalled fror: tae ee Eka Pass, Exrr_Out, 
Error Summary, Get_Cont_Addr, Init_Cont, 


jfain, Set nee . 
Beeinteotring: ;** prints Euffer addressed until '3$' hit 
;** Darm in - address of buffer in DX 
jo Para cut =— nene 
Mev s Gly sCOsePst Laing s;funccion # for Bdes call 
call Bdos ‘carsiecados and print 
i Gut ;skip a line 


TDs 





@ede 


Peer te Sete SeL SETS S SSS ESTE SESS SEL SEP SSS E SS PPS SSL SE SES SEES? SS FS 
oe 


PUTCHAR sukroutine 


Me he He 2 ke 2 3 He oe 3c he He 2 He ie he he he ie ac oe oe ee he ae ie ae IC iC fe ae ae OC Oe cc ac fe Oe oe ie Oe ac Oe ofc ik oe OE aK OK 


Teaenea trom: Grif. 


Putchar: s** writes character from AL to console 


9 


evar in - OUTPUT Char in AL 

s** parm out - none ; 
mov CL,Bdos_conout ;function# for Bdos call 
mov. ODL,AL sload char to Edos reg 
oe Bdos scall Bdos and send 
re 


Sekt t StS ESS ESSE PEEP EE EE SSE EET EL ES ESE SP ESET SST ETE ST SET TTS StS SS 


READ SECTOR subroutine * 


Se bEP SS SLE SES ESTEE SESE ESS ESE STE SET SET ST SSS FST ST SECS SES SS SS SE FE 


“cau lea @trom: Main. 


Read_ Sector: ;** reads sector into test buffer from bubble 


so Pabm 2n = none 
*** parm out - none, effects global vars 
call Compute Pa eno ;compute ist page# of sector 
sestablish addressability to centroller 
mov AX,MB_contbase j;address of controller tase 
mov ES,AX sload ES to address bubble 
;set multipage mode | 
mov. ES:P_cmnd reg,MB_ multi_page ;multipage mode 
wlOd@meiltEStepage NuUMbker f£Ce “Eranster 
mov AX,curr_pag¢ no ;current Beals number testing 
MoV ES:P_pagesel_lo,AL s;page select lo byte 
mov ES:P pagesel _hi,Ad upece select hi byte 
;set number of pages to transfer = pages/sector 
mov Beta ee orn pages sec ;# pages to xfer 
mov ES:P_ pagecnt_hi,0 j;hi Lyte of # is zero 
;set up buffer to receive data 
mov CX,MB_buflen scount for loop-buffer size 
mov BxX,offset test_buffer ;set index into buffer 
;select bubble device and issue read command 
mov AL,curr_bub_no  ;current bubble # testing 
mov §ES:P_select_Eubdeéev,AL ;select current dev # 
mov £ES:P_cmnd_réeg,MB_read_cnd ;read from FIFO 
auase LOL iantereupt from contrcller 
Read int: 
IF vectored_int 
cmp Tae geg hse sactiglt sWlkepoe Sct Ly tnt handler 
s] Read_in sif zero, keep checking 
mov interrupt_flag,0 ;reset interrupt flag 
ENDS “svectcred int 


IF not vectored_int 
HOV AL, sS2r ant. tlag get interrupt status 
and AL,MB_chkint_ mask ;has interrupt Leen set? 
Z Read int ; ;if not, keep checking 
EVOEP FuIOe VeECtTOred int | ; 
weead L£roOnmeNEB FEFO Eurter into test buffer 
mov AL,£S:P_rdata_reg ;read a byte inte accun 


mov CS gi VeeCadmeccum intoeeurter 

Senic X : sincrement index | 

loop Read_int Tce eck, LOOP 28onot Zero 
push ES. ssave EE 

call Wast Wwdecee ctor GCOnt SOLLer to stop 
pep ES ;srestore ES 
MOV fs. cung fcg,ME Int anhibit ;clear cont int 


ret 
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reer t st PtP PESEE TESTE SES SEP SESE LESS EES EPS ESP SESE LSS SELLS ED ES S SD 


x SET UP sukroutine * 
kA IC i a Ce i a a 2 ake she oe ake Cake RR a IC IE AC fe Re A 2 2 A 2 aR eI ea 
;called trons Main. 
eet Up; ** inits variables and issues signecn asg 
Sa parm in - none 
= 3 parm out - none, effects gicbal vars 


call Crlf ;skip an extra line 
Calwecr Lt >skif an extra line 
mov ODX,orfset msg_signon ;signon message address 
call Print Sac ah aite swrite mSg to conscle 
mov DX,offset mSg_version ;version asg address 
Gaal Pinte t rend swrite msg to console 
Gall serie ;skip an extra line 

Teale talige all ceca: and flags. 
Nov pou ea ss sset flag ae Coe hew pass 
mov curr_ a6. “CUIrEnt bubble # 0 


Mov curr ~eueeor Ne, J current Sect Cr+ “to Q 

mov pattern, ;initial test pattern is 1 

nov pass_no,] sinitial pass S31 

mov errptr, offset ertleq ;addr of error log 
Load MBain errupt vectcr address in tan low memory 


push DS ;Save this pgm's DS 
mov AXx,0 ;lowest memory 
mov ODS,AXx *nake it addressable 


mov MB_ "int segqment,CS ;int vector CS is pgm CS 
Mey MB int offset, cffset Moereljou dandlerj trap handlr 
pee DS” ;restore This le ¢ D 

Ssetmuo wero Ia PIC tc recognize anterruct from MBB-80 
mov AL,MB_int_mask ;mask to enable MB interrupt 
out PrepiAL = send mask to 8259a - OWC1 
Se. 
ret 


° ne ee re ee Sa EEE EES TREE EE EME EME He AE he BEE I oe OK IC oe ae 


: TRAP HANDLER subroutine = 

Pee Teer ere e reer! etree Ee er ert rset Seer e TT ere Tee TET Tee 
scalled £Erom: Vectcred to fron Se interrupt 

Trap_Handler: ;** sets the interrupt flag semaphcre to one 
ae parm in - necne 

_=*> pDanm out — Hone 

mov interrupt _flag,1 ;set the interrupt flag on 

moet sEeturen £EoOnme interrupt 


se He See RM ei me” PE Ct +N aheaERI A Seka he + 
sal WAIT subroutine 
PE eee Te Teer Tt TTT eee Tee Tee Te eee Tee TTT eT TCT TT Tee 
;called fLOle. Lusemcont, Read Sectcr, 

Wile SEGTOLr. 
Wait: sek checks status Of MBB contrciler for busy 
2 3 2K keeps checking (wait) until not busy 
<2 ok parm in - none 


s*k Darm out - none 
mov AX X,“B_contbas ;address Of COD<=O0l1.er basic 
mov ES,AxX -lOaa £S to address bubble 


See _ zero: 
mov AL,ES:P_status_réeg ;géet status register 
and AL, MB_ busy_ cheék -is it all zeros ? 
5B 4 See _ZEIO s1lf so ekeep checking for one 
Bene. DUuSy: 
mov AL,ES:P_status_reg ;géet status register 
and AL, MB busy_check -see 1f busy, and to mask 
ing Gone busy. ~ ;if£ busy, check again 
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ote ott ok ie ee ae ae ee ee ae ak sie ae Oe Me He Me He Te EE Oe a Fe a Se AE OK Oe IE EE KC KK KK EE 


os WRETE@SECTOR siWbroutine * 
2 AC a RC fe ie fae ae ACC I te Ea it a a ft a ak AC a 2 ake a a fe a a ak i ae a a a A fe a a ak ke ok 
JealLted fers Main. , 
Meate Sector: ;** writes sector from test_buffer to bubble 
s**® parm in - none 
;** parm cut - ncne 
call Comptte_Pageno ;compute Ist page# of sector 
seSstadlish addressability to _ccntroller 
mov AX,MB_contbase ;address of controller base 
mov ES,AX ;load ES to address bukble 
sset multipage node 
mov. ES:_cmnd_reéeg,MB_multi_page ;multipage mode 
sload first page number for transfer 
mov AX,curr_pagée_no ;current Bede number testing 
MOV 25:P_pagesel_1lo,AL ;page select lo ryte 
mov ES:P_pagesel_hi,AH ;page select hi Lyte 
sset number of pages fo transfer = pages/sector 
nov ES:P_pagecnt_lo,MB_pageS_ sec ;# pages to xfer 
mov ES:P_pagecnt_hi,0 jJhi byte of # is zero 
;set up buffer to send data 
mov CX,MB buflen-1 ;ccunt for loop-buffer size 
mov BX,offtset test_buffer ;set index into buffer 
;select bubble device and issue write cnd 
mov AL,curr_bub_no ;curréent bubble # testing 
mov ES:P select _ktubdeéev,AL ;select current dev # 


mov AL,( 5X -load first byte 
mov ES:P_wdata_reg,AL ;write a byte to FIFO buff 
oie | Ex ;increment ind 


EX 
miOv ES:P_cmnd reg,MB_ writelcemd ;write FiFro buff 
Meewat. f£Or interrupt from contreiler 
este int: 


IF vectored_int 
emp Omrereupecttag,0 ;wili be set Ey int handler 
jz Wate int sf zero, keep checking 
mov interrupt _flag,0 ;reset interrupt flag 

ENDIF ;vectored int 


EF not vectored/sint . 
WOVY AL,us. Plime flag ;get interrupt status 
and AL,MB_chkint_ mask ;has interrupt been Set? 
z Write int ;if not, keep checking 
MULE  <Bot VEeCtOored int 


swrite into MBB FIFO t-uffer from test buffer 


mov aL,({ BX ,Oyte from burfer to accun _ 
mov ES:P_wdata_reg,AL ;write a byte to FIFO buff 
nC . oxo ; s;increment index 
loop Write_int odec. CMs LOep lf nct Zero 
push ES. ssave ES 
call Wait jwateweOk- COncLOLlLer tO Stop 
pop 5S SE €scvOole £5 
ey Soe cine ne Gg teaent 2nhneplt ;clear cont int 
re 
SEPtrrrercerer errr rr err re eee rer eter rer erer ere rrr rer res sy 
_* DATA SEGMENT AREA * 
9 oi ee te ie otek ice aC oR i te ae a i 2k 00 A RAE Re RC ICICI IC FE aR i 2 2 AE i a ake 2 a fe 2 i ae 4c 8 2h 
DSEG i: 
org 0100H ;ieave room for base page 
tA aaa ----------- Vat abl 3S wm mr ann wn a a nn nnn = = * 
Ascii_table db OOH,01H,02H,03H,04H,05H,06H,07H,08H,09H 
= 7 for Ascii 3aH +0 GOH - invalid 


D = a 
Goede, von ocd ,0di, Cen, OLN 
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cons_buff 
@acrt bub no 
curr page no 


Curr sector_no 


eaericg 
erretr 


mmeercupt flag 


MB_contbDase 
newpass_ flag 
pass no 
attérn 
est_rtuffer 


¢g_ccunts 


= | fj eowrwewe 


(“A tn 


q_donebub 
g_ dconepass 
tSg_d_pass 
msg_endtest 


msg err 
msg_e dev 


msg_e page 
msg_¢ byte 
msg_e wrote 
msg_¢ read 
msg_errinp 


msq_getaddr 


msg_header | 
msq_ oe oe 
msg_initen 
ms¢c_signon 


msg_summary 
msg_testing 


m¢sg_version 


@e8d6 @e 


ESEG 


HHH HAHA 
egegodoe Bow Bonoe Bones 


a. ————-—=—— string 


BU WAHMA BHAABARABARIA DAMA G4 Hy OH OH ABA aoa 
OZOUOYZOOQMU EO OOOO U OU OOOO OOOO OO SO OOOO UU OOO oo 


Couputes2 Ze saneca for Consastring input 
1 sbubble device # 0-7 testing 

1 ;bubble cogs + test ing 

1 sbubble sector # testing 
MB_maxdevst+1 ;table for dév error count 
1 spointer to errlog - index 

0 sint flag - semaphore,from MBB 
OOOH ; base segment addr for MBB-80 


0 

1 eee for indicating new pass 
1 ass number 

1 est pattern 

MB_buflen S buffer to hold test data 


data ar2a for console messages ---------* 


Caeeeek cee rs) 


* Done with a bubble.$! 
, Done Ween. BASS, * 


tor 
'tUJser terminates act 


Dice's * 
,returning to CP/S 


es 
$ 


aa) 2®e2 2 af) @ @ @f) ej) A) aS an) 


$* 

**KERRORS net exactly 4 digits entered, 
Or eee hex digits!!5 ; 

ga yg fos ABE irdigit segment Jee addr' 
ess oe BBS SORGONtTTOLLECE.*, cre, 1 

Bed ce in hex (4 digits, then CR oniy) * 
sagt. Page Byte Wrote Reéead3s' 

Gye: siier is inte: the SN a al 
Contrcller is initialized.3 


'** MBE-80 CP/M-86 DIAGNOSTIC TEST **$! 
‘Total errers for each device (0-7) :$° 
PHeESt LNG. and ct any char (& CR!) § 

tte SGCp dt uen cols pass. 3! 


rae eee Mode Version 1.0',cr,1lf 


vectcred_ ant 


y Vectored eitercuptss* 


Dh vcetoned ont 
ACT yectcred_ bp olge 


Pclled mecerdptss" 


aoa “NOt, VECtLOr ea, int 


*GENCAHD to fill last address 


Set oe kak oe eR KHIR end cf variables #34 Ak tek oe OK A KKK 


1 





Pe rE Pt SESS SESS ELSE SEES SE SEL E TES ETS EEE E ETL ESE ETS SEL SS SSE SS 


MBB-80 CONTROLLER AND PORTS * 
i he oie she He he ee 336 ek Re 2 2c te eat he i te A ae ee FCC fie te aie fe 2 fe ee fe 2 le ie ek 2c fe a ic fe fe aie 3c 2k se 


Yh 


agesel lo rb. ;is byte for page select, (0) 
bag ssesa ED | ms 2 bits for rage select, (1) 
nd_reg rb ;command register, 
;read data register, (7), 
‘write data ee el ) 
‘status register, 
;is byte for page Peover: 6 
agecnt_hi rb -ms 2 bits for page cnter, i 
9 
A,B 


7 
1 
1 
1 
1 
Sepsize lo egos sis byte £or manor lcop sZ, 
Biccbeisc- hi rb , - nS Eppes £Or wine. co aa) 
1 
1 
1 
P 
fe) 


;internal use (page Fes} 
ee size register, 
I use only, 
-two usés: sel On Eae ia au 
bubdev ; interrupt flag S 
and Port definitions xk a # * & % 


_pagesize reg rb 


r 
_select_bubdev rb 
int fl ag ae _select_ 
yor yses x sndisormconc FOL 1eEr 


he 3h he he ate he Se Ae ae mc a ee a ee he he ae he Se ae HE HE Oe a Me eK Rt Me MK He HK eK HK KKK KK KH HK eK HK HK HHH HK ke 


OMMY CDATA SECTION * 
SH i ee a Ke 2 ee he 2 2 iC Ae EE 2 He ie fe fe i A A RO ie A a He a ok a I Ok 


ut 


ee etwesececews or 9 BO RTO TO Ona a feseese* ** 


bsolute low memory 
Mart TGP/M Interrurt vectors 
aa) Ver ince oy De for Ns 


DSEG 0 
org 


of) 

cw 2*(MB_int_t 

meant offset cw 1 : 
MB_ int _segment rw 1 . 
* 

r 

bY 


ddr of int vector segment 


HH He He He He 2 he HM eK RK ee eK MK HK eek Ke HK 
* 


m DIAG86M 
rere Te TC eT TT TST TS ST TT ee Tt eS S| 


a 
s 
= 
ye9) 
addr cf int vector cffset 
a 
iGinngoe ao aGEIOIa CIO IOIGE II IOI * 
2 a 
* 


* 

End cf Prog 
2 Ke iti fe ac i 2 ak de ie fe ie oe cate fe fe fe i ee ae i ah a 
END 
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AFPENDIX D 
PROGRAM LISTING OF MBSOFMT.A86 


FILENAMES: Pascal = MB.MESOFMT.TEXT 
CP/M = MBSOFMT.CMD 


Pee EEE SS FES SE EE SEE SESS SE SES SEES ESE SSE ESE SESE SEE ESE SES ES ESS ES 


8086 FORMAT PROGRAM FOR PC/M MBB~-80 BUBBLE MEMCRIES * 
ote Te ee RR i I A i 2 Fi i I 2 RIC I I RIC OR CC 2 2 80 a eo 


T - Intel 86/12A SBC, 20 address lines, MDS ebony 
AS, Sie on 86/12A converting to low 8 bits 
a igh. .. a ee 
MBB - Interrupts disarled by disconnecting the inter- 
rupt jumper on the MBB board. Multi-page mode. 


his program writes a formatting code (0e5H) into _ every 
ue? in the bubble devices. This code is for standar 

M compatible disks. 

h 


e MBB-80 controller tase address is read into variable 
MB_contbase'. MBB-80 address select pins must c¢crrespond 
to this address. This prcgram uses memory mapped I/0 
thrcugh the base address. 


Be ttt tt ett eet EST TESTES TES ESE LES ES ESSE EC SEES ES SEES SST SS SSS SS SS 


Jeftrey Neufeld and Michael Hicklin CS-03 Thesis * 
ek I IOI I I IOIDI I ICR I IOI RR IO IO OI CIC 


- 
: f 

T 
7 
: t 


’ 

- CCNFIGURATION: 
HOS 

’ 

oe oh te ok eK 

9 


-* Bdos functicn numbers for calls *® 


Bdcs conbuf equ 10 sconscle string input function # 
Bacs conout equ 2 ;console output char function # 
Baece pstring equ 9 goers ScElog until =" fLunctionese 
Bdes_ reset equ 0 ;CP/M-86 reset to CCP function # 
MeemMEe characteristics * 
MB_buflen equ 144 ;cuffer Length for sectcr 
MB_maxdevs equ 7 ;cbubble devices are #0-#7 
MB maxpages equ 641 =e 2 page= on each bubble device 
MB _maxsectors equ 80 ;# of log sectors on each bub dev 
MB_pages_sec equ 8 i) OL SoCs logical sector 
MB fagesize equ 18 sbubbl evice pagé size 
MB skew equ 12 ;skew for page translaticn 
;* MBE command masks and status masks * 
eee ey check equ QOQTO0000B ;cont busy? status check (20H) 
ME init_cmd . equ QQOQOQQO01B ;init the controller ae 
MB 2nt_inhibit equ 100000008 ;int inhibitysreset mask { ae 
MB chkint_mask equ 100000008 ;mask testing if int set (80 
MB _multi_page equ QOQOQTOOQOQQE ;multi-page mode command (10H 
MB_read_cnd eaqu QOO01T0Q0TOE acme read command (12H 
MB _reset_cnd equ Q1TOOQO00Q00RB ;reset the contrceller (408) 
MB write _cnd equ QOOOTOTO00B ;nulti-page write command (14H) 
;* Miscellanecus equates * | : 
Benbdur size egu 80 jou 2ZowOLTCOnSOLS Input Fucter 
er equ OdH pASCIs Casraage return cent char 
format_patcern equ Oe5H ;tormat pattern for every poyte2 

a equ OaH ;AScCii line feed control char 


oe jf 
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ret ttt tee ett Tt SS EEE LESTE ES ESE ST SESE ETS EST TET ET TT TEL ST SST tS SS 


Me 
= MAIN PROGRAM ~ CRIVER * 
He ae i he ke 2c ie ic A Be He a ie i Re 2A EA I IC ICR he OE oc he 2 2c Ac a aR a ae fe 2c ae ic 2 ae 2 aie ac oe 2 2 ae oe aie oe 


Sewswewese Ge we 


CSEG 
MB@QOFMT: call Set_Up sdo initialization 
call Get _ Cént Addr ‘get address of MBB-80 kase 
Call fae Cone ‘init the cont and devices 
Bernat oe 
l Write Sector sWwrite a Sector to bubble 


sadvance to néxt sector in dévice,see if last sector 
mc CUEr eSectior no -increment current sector + 
emp Cubs ae ceer no, ME Maxsectors ;last sector ? 
jnz Forma t_ ee sit not, Format next sector 

swas last sector,advance <tc next bub dév on board 
mov DX offset | msg_donedev ;adadr of done dev asg 


ea) "Pens Scering swrite msg to console 
Gup Gurr _ Bub no,MB_ maxdevs ;last bubble on board? 
iz Don2 format Tioesc, One with ftOrmatting 
;prepare to Format next HEE device 

inc curr_bub_no if net, increment device # 
mov curr sector_no,0 ;set sector # back. to zero 
jn Format_loop sgc format next device 

Cone forma 
call Close_JUp ;de end of run housekeeping 
mov CL,Bdos resst function # for Bdcs call 
mov DE, 0 *DarameteL to release memory 
call Bdos ;call Bdos to terminate prog 


eM kK KKK KR KKKK snd of Main Program SH ie ae HE AK oe He he ae HK ae i KK ae oe oe eK 


2 ie i Re IC ae he fe a ale 2h he 2 fe aie 2k i A Ne ke al a A a ic 2 ae A a a a i ae 2 a iC Se fe 2 2 ai ke fe fe ode is 2k ie ok 
BDO eo /h— 36) subroutine * 
eeooeero orice ncaa nae PE TeTeLOTECStOS SECS SLE TS SSS tS SS 
;called frog: soe Cont _Addr, Main, 
Print = OE Putchar. 
Bdcs: os entry tc Bdos via sortware interrupt 224 
= a 3 parm in - caller loads regs as per req 
2 oe 2k parm out - as an Gees Dy Bdos returns 
zee 224 : software interrupt 
re 


ot 


@@¢ee 


© he Me He he ie he 3c A He He aie ae ie Se he Se he Se He cM He ht de Ae aie He 2 a i Ae ae a ae AK ae he ae He ER KK 3 a a KK KK 


7 CLOSE UP subroutine * 
5 8 ei Ae fe 2 ee ee ae 2 ee ei Re 2 a a a 2 2 3 ak ok a ie a a a a a aC ak ak a ica a ei ie oR a 
scalled frome ain. 
Cleos¢e_Up; 2x issues gcodbye 
9 ok parm in - ncne 
= ok oe San Onc —- none 
;issue gcodbyeé message 
ca 


@e¢0 


(Crag ioe TSenpwexcca Line 
mov, DX,offset msg_ endformat ;addr done format asg 
Je periaelas “String swrite msg to conscle 


@e@ee 





he Se he ai 2 2 2 AC Ae ee Ae CA eH HK EE EK KK KH HK RAK Ke 


a 1 


COMPUTE PAGENO subroutine * 


SCOR IOI IC Aare aio doi nok IR Fok GIGI RG IOi a I aC I III i a IOI i 2 a teak ai ao ak oe 


"called <roa: Write Sector. 


Compute Pageno: ;** computes Ist page # for a given sector 


Seo atctein - NONne, WOLKS On CULrrK_SéeCctor_no 
Fhe pare out - ph apeeres curr_page_no 


xor AX,A ;se to zero 

CHP WNL -curr Sectcr_ no 32s it sector 0 ?. 

pz Store page -if sc, no translation 

Mer Grex sclear CX for counter 

Tey Gh,etrr Seetor Ne scCntr EOr translate loop 
Add_skew: 

add AX,MB_skew ;# of pages between sectors 

Cire ‘Crear call 

sbb AX,MB_maxpages ;mod to # of pages 

jae Dec _ séctor eee if positive (CF=0) 

add AX,MB_maxpages ;went neg, add back # pages 


bec SeCCtOr: 


Stcre_page: 
no 


ke 


merit: 


GJ esevse0e 


loop Add_skew ;dec sector #, add skew again 


Y curr_pag¢_no,AX ;store page number 
re 


-SSeESSE SS ELE SES SS SFES SSE SEL ESSERE LSS ET SEL EPS SPS RS SES SSS SS FS FS : 
¥ 


LF subrecutine 


* 
Con 
- Prt ttt tt StL Ee YEP TEEPE SESE EEE STEELE EERE EE TS ELST ST SET ELS St tS SS 


yeawered from: Clcse 0b, GeteCont_ Addr, 

_ Pri CONt jude ec inht ScrLing, Seteaup. 
s**% sends carriage return,line feed fo cots 
s7* parm in ~- none 

ose Dare out —- none 


mov AL, ct [Carriage SSturn char 
call Putchar swrite it to console 
Move, AL, ;Line feed char 

call Putchar ‘write it to console 
ret 


0 Me Me eae ee ee ee Me oe ee ee oe Me ee ee a HK HK KKK KK AK KK KR KKHK KKK K KK 
* * 


GET CONT ADDR subroutine 


3 
Pert rere TESS ESTP ES ESET EPS SEES ESTES PE SSCS ESP SSP SET ES FPS SET TE SS 


scalled from: Main. 


et_Cont_Aiddrs: ;** gets base segment address for the MBB-80 


;** controller from the user at the console. 
s=* parm in - none 
;** parm cut ~- noné, updates MB_contbase 
nov DX,0 fset msg_ getaddr ;addr of get cont msg 
cap aPrint, SebunG swrite msg to console 
;get base address kéyed in by the user 
mov cCL,Bdos_ concsuf ;input console string funct 
mov BX ,ofiset ccns_buff ;area for_cons input 
nov oh eee pen les },cOubur Size j;tell Bdcs size 
| 


mov BX weoad Vaemeror Bdos call 

Camel Sees ;read trom console |. 

ead. Cart ep a line after input 
smake sure only four digits keyed 


in 

Moy bx,CLisSet cons butt+! ;byte 1. telis how many 
cmp byte ptr( Bx], ;see if exactly fcur read 
Nom Eesocminpuie = 9 saf net 4, error 

smake sure al=l four digits are valid hex 
wey BX,ertset ccens butfit2 s;byte 2 starts data 
Mor AxX,aAxX sused for Ascii takle index 


mov CxX,4 shumker of digits to check 

eneck valid: a 
NOV neo Thee ;move digit to AL for chking 
cmp AL,0308 -check tO see if tco low 


Te 





jb prsOr input 
cmp AL,046H scheck to see if tco high 
ja BEE OL input 

ely sues 10 ;chk mid-invalid (3aH-4OH) 
ybe Valid hex 
cmp vetoed 


jee Valid hex oer. ; 
__jJmps Error_input fic 2S 2h the micdle —- error 
Valid_hex: 
Sub AX,030H ;-30H to get table index 
push BX i save bufrer addr 
mov BX,AX 1s index to takle 
mov AL,Ascii _tablef Bx}. a aintte look up 
pop BX restore buffer addr 
mov Bee ptr{ BX ],AL > SLOre hex back in buffer 
inc ,next oa Gat 
loop Check_valid ee. GorcueceK it 
sconvert 4 valid hex ike to a binary number in AX 
mov Bx,orfset ccens_buff+2 sbyte 2 shoo data 
mov AH,( BX] sget first oer 
mov Ci, Sshite ie to high sibble 
Same a, CL 
Sis eles Mesh ;increment index 
Or AH,( BX ] s;2nd dig orted into low nibb 
inc Bx ; increment index 
Nov So|b ees | 7GeCt sonibd digit 
mov CL, Shift it to igh nibble 
shi al cL 
inc BX” ;increment index 


Or it Yth dig or'ed inte low nibb 
;store conten er pees address that was built in AX 
mov MB_contbase 
jmps Get cont_ — ;go return 
serror in input, issue messagé, retry 
BEror 2nput: 
mov DxX,offset msg_errinp ;addr of error message 


Sa Mee P iat 6 St fang jweite nsg to console 
Sep Crit skip a line 
mere oo BCont »Addr go @sk again 
Get_ cont 


emai 0 oe SOA A RE SE SA AAE TAS SOMERS TARE OO RE 
. Eiet. CONT subréeutine 5 
as ead aS TE ARSE AGELESS SS Soaks eS EER RS eee RARRE DS 
‘called from: Main. 

meat Cont; -** inits the MBE controller and each device 
3 ae parm in - none 

ee [-7 Dawn out —- none 

finicialize page size and mincr loop size 

te 


’ 
’ 
9 
e 
? 
; 


mov AX,“B contbase ;address of controller base 
mov ES,AxX sload ES to address bubble 
mov AX,MB_maxpages ‘pages per bubf&le eee 
Mew ES: P feopsize ic, icopsize cate ee 

= 


nov a loovsize_ ~hi;,Ad ; Loopsize hi 

mov ES:P_pagesize_ reg, 4B_ pagesize; page Helge E29 
sissuse reset command to the ccentroller 

mov AL,MB_reset_ ene ;reset mask byte 

moy ES:P ao Teg, A ;issue reset command 
sinitialize each bubkle Pee 

mov CX,4B_ maxdevs+t1 sccunt for loop-# of devices 


t 


mov AL,0O ‘device $iECO Initialize 

mot cach: 
mov ES:P_select_ctubdev,AL ;select each device 
mov ES:P cmnd reég,MB init end. <inle Rees device 
push AX!push CX! push zS ; save bubble ccunter,&ES 
Cail Wao swait for ees tt oe to work 
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POON PStmoor eck EOr AG BreStore ES,cntr,bubble # 


nics Al snext device number 
Loop For_each . Wdec Cx, Loop 1f net Zero 
sissue msgs indicating formatting in progress 
Gall GEla, sskip an extra line 
mov. DX,orfset msg_formatting eoEue cera msg addr 
Gerel Prant. 5trrng s;write msg to conscle 
ret 


Sep oh ie Ke oe a 2c fe 2 hc fe 2h ag ae She ake te a a fe de ac he ke ake a ic ke a ake ake ag fe i a 2c ae ake a ae 2 fe 2 aie 2k ae ac ic at a 2 ae oe 
a PRINI STRING subroutine * 
Sie ft ote 2036 0 2 2 2c coke ake eae ate ake 2 ae a SE 2 fe ac i a Ce 2fe ae ac ee ae eC ae a fe oe 2 fe fe 2 he te 3k ae ft ak a ake ic ie 2 
sGalited from: Close Up, Get_Cont_Addr, 
; gat Cont, Mazn, Set Up. 

Meme String: ;** prints buffer addressed until *S* hit 

s** parm in - address of puffer in DX 

;x* parm out - none 
mov CL,Bdos_pstring ;function # for Bdcs call 


@S@eepeedsdese se we 


call Bdos fcaue EBadOS ahd print 
Seas Crt ;skip a line 
re 


He He he ae ah he he 4 he Bh He Oe ah he AE he ES EK Me he He EK OK a Ae He Me he ME 3 3 ee BC Oe Oe OK Oe he ok 2 ae oe OK 2c 


«= 
a PUTCHAR subroutine * 
ole oe oe 2 80 29 Ce fc he 2 2 ak 2 he ee a a 2 ic 2 ae ac a ae a a ae ae 2 a oe ak ae a 28 i i a a ac a ai 2 a ao ie fe a a a 2 
{casted from. Crit. 
Putchar: ;#* writes character from AL to console 
;** parm in - output char in AL 
;x* parm out - none 
nov CL,B os_conout ;function# for Bdos call 


mov ODL,AL ;load char to Bdos reg 
a Bdos scall EBdos and send 
re 


we te ee fe ic he i i eC eR RC eR 2 EC 2 FE RR 2a i Me 2 i fe a pe ie oe i aie ae a a ake a fe te 

— SET _ UP  sukroutine | 38 

9 Re i 2h 2 2 2 a 2 he fe ce 2 i he fe a iE ke A aK a aR i i ake a ake i ac ae i a 2 ae af a a ae ae a ak fe 
ZecaredetrOQms Main. 

Set_Up: ;** inits variables and issues signecn asg 

(2 Dace on —- none 

,ee Darm out - none, effects giobal vars 


Cant Cet ;skip an extra line 
Cala Crt . 3Sskip an extra line 
nov. DX,offset msg _signon ;signon message address 
Sane, Preant String swrite msg to conscle 
mov. DX,offset msg_version ;version msg address 
Gon Pernt String ;write msg to console 

ee cape. Crit ;skip an extra line 

sLnitialize all variakles and flags 

mov curr_bub_no,d ;current bubble # tc 0 
MOV SUSE SECtCr nO,0 ;CUETEnNt sectcr is to 0 
gets 


He ft he ee oie fe afc ae a ae Re ie oe ake fe tea fe i a ae ee hc ic he 3 pc af 8 2h 2 2 he i ke Re ic eR AC ie ae ae ke ae 2k 2 OK 
WAIT subroutine * 

3 ft ht ak ae 3h he 2c fe he Be hehe Fe Fe 2 2 oe 2 ae te 2 a ake 3 fe ae a ie i a Ci 2 ae 2 a a 2 2k 3) a 2 2c a ae afc a 2c afc kc 3 age 

f [eaaed LEQ init Cont, Write Sectcr. 

Meit: s** checks status cf MEB COMERCLLCE LOL. busy 

;** keeps checking (wait) until not busy 

se@ Darm in = none 


at 


(cay parm Out - ncne 
mov AX,MB_contbase ;address of controlier base 
mov 2S,AX sload ES to address bubbie 


Vor 





See Zero: 
mov AL,ES:P_status_treg 
and AL,MB_busy_ check ,; 

See_ Zero 


;get status register 
BS Se ail zeros 2 | 
f sc,keep checking for one 


JZ Feu 
Cont_busy:;: 
eg 
t 7S 
jnz cCont_busy pale 


MOY AL, 2S: Pustatus or ;get status register 

and AL,MB_busy_check ee if busy, and to mask 
busy, check again 

ret 


he At i oie oe he he ae ae ie kee 2g a oa A ee eh 9) HE ee ee 8 a i 2 le RI A OR A a a Ee a I I eo 
x WRITE SEClOR, Subroutine * 
PEEP POLETSSL COC SSCC£SOCSC+TOOT OS SOSCCe + ECSS CLES ST EES EST Ser Te eT 
scalledetrog: Main. - 
Mette SeECtOr: ;** writes sector using format patt to MEBS0O 
[= Ppdri 2n. = none 
sxe parm out - none 
call Com a Soseacaae ;compute ist page# cf sector 
sestablish addressabiiity to controller 
mov AX,MB_contbase ;address of controller base 


@4¢620 2@*e0 6 


mov. £ES,AX sload ES to address bubble 
;set moe ae e mode 
mov ES:P_cmnd_reg,MB_multi_page ;multipage node 


sload first page number fcr transfer 
mov AX,curr_page_no ;current page # formatting 
mov ES:P_pagesel_lo,AL ;page select lo byte 
mov ES:P.pagesel_ hi,AH ;page select hi byte 

;set number of pages to transfer = pages/sector 
nov Eee one spe 9 eo naee ;# pages to xfer 
Mov ES: P_pagecnt_hi,O ;ni byte of # 15 Zero 

;set up bufrer to send data . 
NOY  Gwmeio DUrLen=1 senunt for Lloop—buftfer size 

sselect bubble-device and issue write cmd 
mov AL,curr_bub_no _;current bubbie # formatting 
moy ES:P_select_bubdev,aL ;select current dev # 
mov AL,format_patterno ;load format pattern ; 
MOV ES:P wWdeta reg,AlL wwEite a byte to FIFO buff 
“mOV 8S:3:P_cmnd feg,4B write Cad? 4Wrlte FIFOMbuEE 

Meewate fOr interrupt from contrciler 
Meace int: : 

MOV Also: eh 1nt flag pees lnterrupt status 
and AL,MB_chkint_ mask ;has interrupt been set? 
m2 Wesee Tat ;if not, keep checking 

Hecate Into UBB FIFO tufifer Ercm £Lormat_fpattern 
mov AL,format_pattern ;byte from pattern to AL 


mov ES:P_wdata_reg,AL_;write a byt¢ to FIFO buff 
foop Write int Wee ek, LOOD Lt act Zero 
push ES. ;save ES 
Saab) Wa it “walt sror controlLlerstowstop 
pop ES »srestore Le ‘ 
MOV ES:P_cmnd_reéeg,MB_int_inhibit ;clear cont int 
rat 
PEEP oreo ere rr ere pr Perr rrrri rr errr erirrertrrerrr errr ere ress 
i DATA (SEGMENT AREA * 
0 Re A ie Re IC he CA 2 ie A KC ie RE SCE A 28 I AR INE IC Ee aie a Sse a aC A He I a 
; DSEG 
org Q100H ;leavye room for base page 
: 50% were ree een een Var lable srr cn nm ene nn eer ne reer ene * 
Ascii_table db OOH,018,02H,03H,04H,05H,06H,07H,08H,09H 
Soe? [ebOL ASGl12. Gah to 40H = invalid 
. db QaH,0bH,0CH,OdH,0¢H, OfH . 
@ons burs BOCOWONr  S=Ze sasea £Or console input i. 
Sucr bub ro clo ;cbubbie device #0-7 formatting 
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Gre page _no cw 
eiyenre Sector no Se 
W 


1 ;bubble page # formatting. 
i - bub logic sect # oem een 


MB contbas2 OOOH > base segment addr for MBB- 
2 tk ----—-=— string data area fer console messages --------- “ 
msg_ donedev db ' Done with a device.$! 
msg_endformat ab ey Sear complete...' 

ab treetenang to CP/M! $* | 
msg_errinp db ‘"** ERROR: not eractiy 4 digits entered, ! 

db ' or invalid hex digits!!§$ 
msg _ formatting db "Formatting. ahr WMEMECCS «5 ssc «we @ ' 
msg getaddr GD) Clerk tor ABBe 4 digit segment rkase addr’ 

db ‘ess fcr MBB-80 ccntrollér.' epee Ned 

GP Hage fe in hex (4 digits, then CR Ongigy)* 
msq_Signon ab. -f y 

db ae MBE-80 CP/M-86 BUBBLE FORMATTER **$! 

msq_ version db uo 

alley fyiblibiasts— Fage Mode Version 1.0$!° 

hey 618, ;GENCMD to fill last address 
IE oir doi tok ae end of variables 8% KK 1% He eK HR KK KEK KK 
' ESEG 
2 oe OOS ST See SS EAT gia cdi dalle la ld el adalah 
; B~80 CONTROLLER AND PORTS * 
om a 5 eae chad SARAAAS TETAS EAE TRAST AES RARREA RARE EEE ED 
P pagesel_lo rh 1 sls byte for page select, (0) 
P_ragesel hi rb 1 “2S 2 bits for fage select, (1) 
P_cund_reg ED Ct command register, (<) 
P- rdata_reg 4 ;read data ceehiesaes I, 
P wdata_reg ey oe ;write data peo ee net ) 
P_ status reg Bp, 4 ;st atus register, (5 
P_ fagecnt lo og 6 ae -is byte for page Ser, 6 
_ React t ‘ela £ Ole. ; 0S 2 bits for fage cnter, (7 
P_lcopsize_lo EDO sls byte for minor lcop S24 8 
P_lcopsize_hi ED ae) “ns 2eDres fom nin Ico 9 

cw 1 ;internal use (page Fos ¢ ( A,B 
P_pagesize reg rb 1  Fe9¢ size sacar ete Gat 

cw 1 Iouse only, (D i) 
P_select_bubdev tb 1 -two uses: sel bubble dev (e 
ee phic ke ag Sau P select bubdev : Lnterrupt lag F 
: Pees re * end o Pone oiler and Port definitions ****xexEx 
Salles letter aed 
Hag End JO Program MBSOFMT * 
oh ft ot ie oi 2 oe fe kc ake te 2 fe ae he ai 2 2 2k fe a 2 oe Pot och ek eaewde ca eee eee ee aes 


END 
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AFPENDIX E 
PROGRAM LISTING OF MBBIOS.A86 


FILENAMES: Pascal = MB.BIOS.TEXT 
CP/4 = MEBICS.A86 


@esesesde we 


ete ‘Customized Basic IyoO System! 


SR IUIEIO IO ICC IC IOI a IO IC ao I a aI a OIG IO I IC ak iri a i ie eae 80 ok Ake aE A IO ICR OK 
om 
-* This Customized BICS adapts CP/M-86 to 
the following hardware ccnfiguration: 

Processor: _1SBC 86,/12A 

Disk Controller: Intel SBC 202 

Bubble memory: MBEB-~@0 with memcry-mapped Iyc 
Memory model: 8080 
A. N 


Programmers: J. 
Revisions : 
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M@OPGeGesese We VPedewde VEG 
RRM MEM 


oR i ak ake ae ae a ike hea ae he EQUATES 2 A AR Ae ek 2 NC 2K 2 ai a OE 2 ote He ke 
ow x 
ass? TTT TTT Miscellaneous equates ee. | 
> | : ; 
addr_high_rao equ Of00H ;high para user available RAM 
bdes_int_type equ 224 ;reserved BDOS interrupt 
ne equ OdH WASCIl1i Carriage ITeturn 
disk_type equ 0148 TaOCmac mn stanaga rd Sea disk 
ue equ -1 ;icr conditional asseably 
false egu net true ;for conditional assembly 
it equ Q0aH ;ASC1ii line feed 
max retries equ 10 Momma 2 stl /O, i OL tries 
tbb80_type equ 02H as for MBB-80 bubtle 
| sector size agqu 128 3;CP/M legical disk sector ace 
a i —— - —— I8251 USART console ports <r 
CONP data SU Ode wee oro dara port 
CONP status equ OdaH ;18251 status port 


fee Desk Controller ccn d bytes and masks (iSBC 202) --- 


> | ; 
smask to check fcr DK Eernoe 


nan 
DK _chkint mask equ OOUH 
vie ;mcve to home positicn command 
O6H 


CK home cud equ 0 
DK_ read cad equ 0 ;cead command 
DK writ2 cod equ 0 swroite ccomnmand 





Sesese se seve @ 


’ 
a oe te ke ee eke ede EN Of Equat 65 RM RR I a Ie ae Ke a ER 


es Mince EonGee empl sk COnELCllor Ports --=-------- 


CKP_base equ 078H {7ErLler's base in CP /M- ae 
pes equ DKP_raset+l ;operation result type 
CDKP_result_byte equ DKP_bFaset3 ;operation result byte 
DKP_reset equ DKP_ctase+t/] ;disk reset 

DKP status equ DKP_ frase ;disk status 

CKP iopb_ lew equ DKP_EFaset1 ;low addr Dons CEaLOpD 
CDKP_iopb_high equ DKP_baset2 ;high addr Eyte of iopb 


--=--= Megeatc bir olesoharacterlst1cs (MBE-80) -------- 
ME buflen equ 144 ~oOwwect aength £CE MEE Sector 
MB _maxdevs equ 7 ;bubble devices are #0-#7 
MB maxpages equ 641 ;# Of pages on each device 
MB maxSectors equ 80 ;# O£ lcg. sectors on each dev 
MB_ pages_ sec equ 8 ,nOr BUSES Nees logical sector 
MB pagesize equ 18 ;bubble device pagé size | 
MB skew equ 12 sskew factor ror page xlation 
-- Magnetic bubble ccmmand bytes and masks (MBE-80) ---- 
MB_chkbusy_cmd equ 020H 31s controller busy ? status 
MB chkint_mask equ QO80H ;mask to chk for MBB interupt 
mee2nhsnt cad equ Q80H jfinterrupt inhibit/reset mask 
Mee2nit cad equ Q1H lei tea ize the cont rcijer 
MB mpaqge_cad equ 010H ;multi-page mode operation cad 
MB _read_cad egu 012H Te ae he read command 
MB _reset_cnd equ OOH ;reset the controller 
MB write _cnod egqu O14H j;multi-page write command | 
weer ere rrr ene Starting addresses easier 
Leader_bios is true if assembling the 
PeaAmeER BSBLOS, otherwise EIOS is for the 
CPM.SYS file. This secticn will assign the 
appropriate equates to the starting addresses. 
lcader_bios equ falss ;** controls conditional asm 

iy not loader_ktios 
addr_bdos equ QBO6H ;BDOS Sie point in CCP 
addr_bios equ 2euCHe- start of BIOS atter CCP 
addr_ccp equ OOOOH ;base of CCP is 0 

ENDIF ;net loader bios 

Dy loadér_bios 
addr_bdos equ O40O0H ;stripped BDOS entry in CCP 
addr_bios aqueous scwse Ob eLOOLOS after CCP 
aera: CC ae QOOSH ;bas@e of CPMLOADER 

ENDIF +LOAadeceeoics 
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oe he ke see aes ee IK START CF CODE eee ARE RR ARK KA KAK ERK RE 
CSEG 


org slosba fefeie 

GEE > ; 
Org addr_bios 

aa ELOsS MIUUBEvielccon  fOneIndg: Vidual Routines ---------- 

> | 
jap INIT ;enter from BCOT ROM or LOADER 
jmp WBOOT ;arrcive here from BDOS call Q 
jmp CONST sceturn console keyboard status 
jnp CONIN sreturna console keyboard char 
jap CONOUT swrite char to console device 
jap LISTOOT SWweece Chamacter to list device 
jmp PUNCH swrite character to punch device 
jap READER ;return char from reader device 
jJnp HOME smcve tc trK 00 on cur sel drive 
jmp SELDSK sselect disk for next rd/write 
jmp SETTRK jSewcraen LCL next rd/write 
Jap SETSEC ssé€t sector for next rd/write 
jmp SETDMA ;set offset for user buff (DMA) 
Imp READ sEreGed..a 28 byte Sector 
AO WHE ls swrite a 128 byte sector 
ie Lists. We cue) tise St2tus 
jmp SECTRAN sxlate logical->physical sector 
amp SETDMAB ;s4t segment base ror buff (DMA) 
Jump GETSEGT ;ceturn offset of Mem Desc Tabie 
Wap GETIOBF ;return I/O map byte (lobyte) 
aap SETIOBY sset I/O map byte (iobyte 


So = = ow =e ee ee es ae @ SO oe OO ow SD SD oS a a DeaPeanDera eae Se eww 422422) ase SB ae ee Pee? eee Se ee eee Se eee ee ee eee eee See See See Se 


oe Me He Me ee He He Be ee He Ae HE Me CE OR Ke MK RK A AK HK HK K HK KH K AK H 


te tee ee x SUN * jump vector destination RM A He Ae ee 
oS i At eK BI 2 2 Ae 2 ie fe Ee 2 i RC a a A IC a A RIC CE IC a RR a 3 IC a 2 


scalled from: -tlos jump vector. 


TS i i $** Enter from BOOT nOd@ or LOADER 
[eae DaLlS fan —- none 

; : ;~™ parm out - none _. 

sprint signon message and initialize hardware 
mov AX, swe entered with a JMPF so use 
mov SS,AX HeS;, 2s the B2orztlal value of SS:, 
moy DS, Ax a boa 
mov ES, AX Sand 25s... 

suse local stack GUsang Initialization 


mov SP,offset stack base 

cld sauto-increment on 
setup all interruct vectors in low memory tc 
address the soft/hardware traps. 


@ewve de 


om _ not lcader_bios 
call Init Blos_Int ;Sset up interrupts for CPM.SYS 
ENDIF sncyt loadér_bios 
Pe loader_bios 
cali ince Lal Int [set uc interrupts for LOADER 
ENDIF slcader_bios 
sperform special initializations for Ce i-86- 
call Load_Dma_ Addr ;load dma addr for devices 
a Levic> Tntss  ;3Nit all devices 
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micas LOleaadsttonel Inatialization go here) 
mov BXx,offset msg_Ssignon. 
call Praint_Msg 7s eau ae message 
mov CL.0 pesedieecto, dt As On coldstart 
jmp CCP mmo eeaecolaG Start ehtry ef CCP 


oA 2 ak ic ee i EE 9 A RC a I I I i a i ee a 2 2 ae ee 2 ak ea aK 2 
kd dk KKK TYBOOT! jum F MeeccOL dest onatlon +s teeueexee 
oe a aE ie 2 ae ke he a He ee A IC AK 2 

7Gaved cCloys DlCS Jump Vector. 


WBCCT: ;** Arrive here from BDOS call number 0 
7t* parm 2n = none 
toes Ppabe cut = none 
jmp CCP +6 sentry to CCP at command level 


5 MK HK HH KE Oe Me eH He EK HK KH HH KH HK HK KK HK KK KH HH KAR KH 


° ok xe 
; CP/M Character I7O Interface Routines * 
7% Console is USART (I8251A) on 8612 at ports D&8/DA M 


esweee 


ett itt tite ES SESE SES PE SEE SEES EEE SES EET ET ESS TE PESTS FL FSET EE ES 


9 


9 eo ht Oe A i ee ee ee Oe ee HK HM HK RK AK HHH KKH AKKKA HK KKK AH KKHK HK HK KX 


sxARaKaKKERHK =F CONST! jump vectcr destination He ee 
ote A ce 3 AC 2 2 he ke fe i Re Ne ke A i He NE RC A RC A a ke 2 
;called frome bics jump vectcr. 
CONST: ;** returns console keyboard status 
;** parm in - none ; 
73% DabRyCuc = returns status in AL 
bd 


phe O=not ready, Off=ready 
in AL,CONP_status ;get status 
and AL,2 ssee if ready-bit 1-is set 
jz Const_ret Pen NOC yee toozerO and net ready 
Om AL, OfLA sis ready, return non-zero 

ON a 
re 


oe A Re ee He i he 2 2 A IR Rk IC eH ai ete 2 2 a aC oe i a ae ae ke 
eee eeee ee €6CONIN' Jump vector destination 7 aS ee ee 
oo ft ke ai ie ae it fe ie ke fe hc Ae A Be 3 ee ee Re RH A HK I He IE I A IE a I A Oe 
sGauited Lrem:s™bics jump vectcr. 
CONIN: ;** returns console keyboard character 
7s= page ln = none 
coe Ode OUt = Eetrurns character in AL 


eau CONS? sget conscle status 

test AL,AL s21S 1% zero (not ready)? 
jz CONIN ;if zerc, keep checking 
in _AL,CONP data ;ready, so read character 
ane AL, 07 £2 scemove parity obit 

re 


@e 
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0 Ke HM He He a ee Oe eH ee eH HK HR KK KE KKK KAM KKK EK 


sera ae  PCONOUTS gun vector destination ***** *£4x*k% 

oi ie ie a ei ee ke I ICI i A ICR I I a AR CAI ICE 2 fC a a a ai a A 
sGalled £rom: bics jump vector. 

eONOUT: sk* write character to console keyboard. 

$** parm in - character to be output in CL 

; *** parm cut - none 

in AL,CONP status ;get console status 

and AL, 1 ssee if ready-bit O-is set . 

jz cONouT if zerc, not ready-keep checking 

mov AL,CL lead input parm to AL for out 

out CONP data,AL ;Output character to conscle 

ret 


3 
@eeee 


ee 


ot ai ek ok ek aI etic ie ici ie te a I i cote a a oe ae ie oe fe 2 
Pot eeeeeeee IL TSTOUT® gua vector destination *#**" kseek xx 
oe he Ae He CH eK A He HH EK KR EK EK KE KKK KKK KK 
;called frem: bios jump vectcr. 
mes LOUT ; ;** write character to list device. 
73 bald in = none 
; ;** parm cut - char to be output in CL 
snot laplemented 
ret 


~@e 


ok SAR AC AC Se Re Ree Ae RH A HCH He RK a A RE KK AK K 
SE ARAAKKRAKKE €6§ LTSTST! June vector destination ****k kaka 
0 Ae A AIC ae PR ke A A AC Rohe ke a te A AI IOI ACO he CI CC 3 FO 
;called from: bios ues vector. 
ieclols: Taro urns Seine IlSt status. 
a eeocee ne One ; 
s** carm cut - list device st 


atus in AL 
Q=not ready, Off=re 


; ready 
shot lmoplemented 
ret 


@6 


oR RRM KKH KKK MH KK KM KM KAKAK A KKAKH RAK KAKA KKK KKKKKAKARKA KKAKAK KH 


Pee eee 8» § PONCH Jump vector destination ERK AKA HH 

© He Hehe ee he eee he He Ae Fe TE HH AH He He eH HH HH HHH I Fe KC I 2 oH eo oe a I oe 
;called from: tios jump vector. _. 

PUNCH: (te WOolce Chabaccer sO the punch device. 
7am Pocm I2n = Gnhabacter to send in CL 

; -**% Darm cut - none 
20 t eases 
mov AL,0O1au sreturn eof fer now 


ret 


~@¢ 
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© He oh ft 2 AC 2A kc ac ate aie eee fe he ae te tc af Se a he Oe AR ee ke he 2c Se i a ee KK KK HK KK KH KKK EK 


ok pk oT READERS JURE VECtOLr GeStination *W4+e &¥ax 4 * 
23 I At aR 2K 2 ie ke ee IC 2 A Re RR a fe I fe a 2 fe ae 2 2 Ee 2 a FE a i fe a 2 a fe 26 96 IE ak 2k 
;called from: -Cios jump vectcr. 
REALCER: °** return character from reader device. 
ws Pauw one - none 
;** parm cut - character read in AL 
mov AL,0Q1aH sréturn eor for now 
ret 


oR Re fe fe ie ae ir fe tet oe fe he Skee fe ee 2 fe fe i ae ae ace ie ae aa ak fe ae 2 a ak fe ae 2c ak fe cafe os 2 aie fe ae fe ae 
Peete eee ee 'GETIOBFE® june Vac Tom sdest at On, sees eee ee x 
oe 9 Re fe 2k fe ke AR ie ke ke ke ke fe RC a 9 a fe a a ke 2 ce i ee ie af ae ae ae a fe fee 2c a oe he a ae a 2 fe 2 
Weawued £Lem>s ElCS JuMDevectcr. 
GETIOBF: ;** return I/O map Byte (iobyte) 
-7= Parm. in —- none 
Dee CabaecuL) = EECUrNS tobDyte in AL 
uO’ AL, iobyte ;iobyte not implemented 
re 


¢ 5 ok ae ae He he oe He he te ee te Me oe hee ae he fe a Oe he ae Oe ae he ee He Ee ae a a ae A ee ee ee Oe 2 OK 


ok aekkeRKKEK TSETTOBF! jume vector destination ***¥** xskKe* 
oR ee He A RK RR A ae IO I EE AC 
“Gaited frome. blocs jump vectcr. 
se. O8F s ;** set I/O map byte ({lobyte) 
oe" Earm® in -~iobyte to be set in CL 
.<* Deam Cut = none. 
mee Lobyte,CL ;Lokyte not implemented 
re 


¢ Be ah Me he Ae he He Ce EE Re ee he Mee eH a Oe ee RM He eH EM He HE a ee a OK EE OK OK 


ok * 
| ae Disk Input/Output Reutines x 
- Bese 1S 1202 Contrcller with perts et 0/78H for 8 bytes - 


9 


mie iy oie ote ae he eH ie ie eae fe he ee He fe ee fe He Ce 2 Oe he ie he HE ae ake Me fe He ee Fe Oe Me eM ae He EK Oe Oe 


3K ope oe oe fe fe 2k 2 ote 2 fe fe ft cae ee fe 2 i Re 2 a a I ie He te a a i ae i 2 RC Ca a ake aero ae 2 shea a te 
fee eee. 6 TSELDSK! jump VieeroO Grades: Duct Onis 6k eee a eee & 
9 3 ft a fe fe 2 fe fee 8c ie sic a ae 2 2 ee a Ne He CIC Ae AE fe Ne i ale Rea Ri fe RC a 2 ie 2 aK fe eH ot ake 3 aa te ae 2 2 
"Carved Emoms bios 9jUmp vectcr. . 
Seb oK : ~*e Select Gisk for next read/write | 
;** parm in - disk numper to select in CL 
wre Damm Cut =- address of first dph in BX 
ph is a diSK parameter header. 


mov disk,CL ;Save disk number 

mov BX, 0 [hpeaay LOG cCLELOr Leturn 

cmp CL,num_log_ disks ;beyond max disks? 

Stal Seldsk re weewilen .: Sc 

mov CH,0 ;double (n) 

mov Bx, CX “BA = 2D 

mov CL,4 ;cready for *16, 16 bytes ¢ach dpk 
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Sri weak, © L 0 gh ee _ 

mov CX,offset dpbase ;address of first dph 

add BxX,CX sdprase + n ¥* 16 

ush. B ;save Gpbase | 
determine type of device this disk number is 

KO ee, ox ;clear BX of index 

mov BL,disk s;load disk number for index 


mov AL,device table{BX] ;find type of device 
mov device type,AL ;store the type returned 
smake CP/M logical disk # mapping to feck! GOnt OF 
;sMBB-80 cont address depending on device type. 
cmp device ey e,disk_type ;1s this a_ floppy? 
jae Loads Mbeauscone 3;2t not, do MBB-80 cont addr 
mov AL,DR pogicat table({ BX] ;get £lopey disk # 
mov DK_diSk,AL ;Stcre floppy cont disk # 
mps Séeldsk_ret ;gc return 
Load_mbb80_cont: 
add BL, BL _ 3gdcuble disk # for word index 
mov AX,MB_logical table{ BX] ;get addr of cont 
mov MB_contbase,AX ;store as current base addr 
Seldsk_ret:; 
pop BX s;restore dpbase for return 
ret 


© oe KK KKK KKK MK HK HK HK KK AKAMA KKK HARK AKA KK AKHKKK AKA KKK KK 


ae ea kx & "HOME? jump vector destination ¥ KHIM KKK Ke 
oO ARCA ee Ace ke ke te 8 Re IA te RT A OR I EI I I I I KC a A 
scalled from: Elos jump vector. 
HOME: ;** move tc trk 0 on curr selected drive 
;** parm in - sone 
Vi pdr Out = nene 
SIOmGeVIGe type,adlck tyre ;2S this a fi 
jne Mbb80_home ;i£ rot, home bubble 
mov DK_1io_com,DK_hceme_ cmd ;heme the flo 
mov track,0 
call Dk_Execute Cnd 


oppy disk? 
ppy disk 


jumps Home_ret ;go return 
Mtb80_home: 
mor Cx, CX ‘elear CX Bec® - track=0 
call SETTRK sset track for bubble = 0 
ao cer: 
re 


26 


= Ae He fe fc 2h ait 2k he fe 2A 2 2 A 2 A Re A Re I A RA i i a IOI A a ee i ae a a eC 

See eee 6TCSETTRK' 6 6jUME Vector destination **#***4ex~%% 

oo Me ie oe Ae Hee Ae ie he ee ee i Ke i ae I fe Re 2 I CI i a a a i oC 
7#esticd f£scn.etles Gump vectcr,, HCME. 

Sel tRK: o*Pesee crack EOE ext read/w#write 


¢;**® parm in - track address in CX (CL) 
oe CaAcr cut = none 
mov track,CL ;stcre track number 
cnp device type, disk tyre wre eh s a LloOppy disk? 
Ne. Seterk Fe foe sO, guse return 
call Mbb80_Track_Xlat ;bubble, so xlat track->bub# 
serctrk ret; 


ee 





Rens ern ag eee en son Lanne eek ee 


2p RAK MSETSEC! vector destination ¥***#* *#4k +x 
2 oe ap ok ee eS oe te a 2 of ‘ee —. Le... 
scalled from: Eios Nap vector. 
SELSEC: ‘ee Seteseetce Lor ex read/write 
;** parm in - sectcr number in CX (CL) 
¢;** Darm out ~- none 
ON SECCOEZEL sstcre sector number 
r2 


#e 


nn femme er ee a, ra. ewan tases 


we ae ie ek 'SECTRAN® vector destination  ***** **k* xx 
oe hi oe a aK I 2 2 ee te 2K IK ae PETES E SL SSOLSe SSS SESE SECS SLT SE SE 


scalled from: bios Jump vector. 
fe 


SECTRAN: -*%x Translate logical. fy Yeabie sector 
-ocPaeg ane Sector in Cx; ae ae ae 3 
s*¥* parm cut - physical sector 

mov CH,0O sclear high byte 

mov BX,CX sload input parm for return 

test DX, DX is there a xlat to be done ? 

jz No_skew hoe. JS tese Cur 

add BX, DX sadd sectcr tc tran table address 


vn 
ct 
~ 
O 


mov BL, [BX ] ical sector 

japs Sectran_ ret 3;qce return 
No_skew: 

addzoax, | snc xlat,CP/M sect #0 => sect #1 
eeceten tet: 

re 


#e 


Re ee, NO ee OE a eg ohtek wea 


¢ 9 hk ee KK KK 'SETDMA'? vector destination KKH KK KR AKKK & 
0 ft i ae ie He ie 2 2 2 he 9 2 2 ak 2K Be ME he He ie 2 2 2 1 A 2 2 2 2K 3K 8 ai OK 2 2 2 a 2 ok ae 2K 2 
*Calteq fren: Dies jump vector. 
SEIDMA: se Set offset for user DMA kuffer 
= ok ak bana In = UNA oOftset in CX 
2 ak ak a0 cut - none 
mov dma offse sstore dma offset 
Call Load _Dima_ (Sar supdate DMA info fcr all dévices 


mc 


@@ 


ee a ee a RO EEK ERE EERE CARH 


ew eKe ee IST OMA Bf jume VECtOr destination . S*¥*£XeXEEKH ® 
2 pert +t S$ TRESS SEE ELSES SS eS SSE SES EE RE SES SSS SSS PSE SL + SS SESE SE SEES SE F | 


waved tlOm.e LOS jump Vector. 


SETDIMAB: ;e&ex Set Segment base for DMA buffer 
;** parm in - segment in CX 
Mot, 3 poe Out. = Done 
nov dma seqnmen+ ;store dma segment 
e2a1) toa Dma_ AGde supdate DMA info for all devices 
ret 


VaEs 





oR A RK SR ee ACR OR FO AIC IOI AE IOI I IC A A A I IC Ee 
Pete e eeeee eS = GETSEGT® Jugp Wiceegmeacst Nason Seek eee Ke 
2 A Sak fee ee ie AI kee eC FN AR II A AC IC EO ae A IE ae Fe ie ae ef 
"Cae Gwe sols 60S seals vector. 

** Return offset of memory desc table 
*x* parm in - none ; 

** Darm out - address of tarle in BX 
mov BX,offset mem desc_table 

ret 


ee SEGT; 


9 eh ae it he ae ee He EK EK KK HK RK KR HH AK HK AKK KKKKK KH KH KHKK KH 


o 
All I/O parameters are seturf: 
disk 1s disk number SELDSK 
feeteret C5 1s track number SETTRK 
SECTOLr 1s sector number Se rocG 





Each device maintains its own DMA info as required 

2 its controller, using dma_orfset and dma_Seégment. 
READ reads the selected sectér to the DMA addréss, 
and WRITE writes the data from the DMA address ‘*to. 
the s2lected sector. The MBB~80 bubble will use diff- 
erent routines *o perform the read and write funct- 
tons. The MBB-80 works with MB bub no (from MBB Track 
Miuat) and MB page_no (from Mbb Sector_Xlat) - these 
values are derived from the vars, track and sector. 


Mt he He he He he oe 29 He The She Me he ae He He he He he ee ae eK KKK KE HK KK HHH KH eK 


Pe ee 


ee eee KR HHH eH RM 


oe ee he He Me ee HC A ie EC ee ie ee ee he Oe He He Re he ee Ke He HH eK He HK KO KK HK KK 


3 Kb eke ok Ke 3 Oh oe ok ‘READ! jump vector destination HH RK RHR HK 
ote ie te ei oie a ie keke IC i RIC IOI RII IO RC IEA I IC ICE 2 I I AE Co 2 8K af 


scalled frem; bics jump vectcr. 


S6EseeoeGesse SOCstoeseseeSesese Gsesese Gesse de Ses 


READ: ;** Read a 128 byte sector 
[a20 Patm inf = none ; 
s™* DaEM Cut = return code in AL 
i: = CK, FF = unsuccessful ; 
cmp device _type,disk_tyre ;i¢ this a floppy disk? 
jne oe ee a sif not, use bubble routine 
MOV ; 
mov AL,DK_disk ;comktiane disk selection 
Sel AL, CL ;with cpccde 
or AL,DK_read_cmd ;create iopb for read 
mov DK 10_com,AL Load. 201pb 
call Dk_Sxecute_Cmd ;perform the read 
mps Read ret 7EecUEn. ; 
Bubble_reads: suse bubble routine to read 
call Mbb80_Read ;sperform the read 
Read_ ret: 
Ret 


@e 
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oA IR I I RO I ICR RCI CR IRC I a a 2 aR RE af A a 2 i 2 2 a 2 a ak ae ae a ak 
skakKKKRRRR A OTUR ITE! jump vector destination 1 WK HH 
oA A i cai ak cae ac Ae ke 2c ACNE ee a ie a a fe age a a ake i ge AI I Rk a 2 AE ICI 2 fe Ea 2 2 ae a a ae 2 2c 
;called frem: bios one vectcr. 
Ria TEs ;** Writes a 128 byte sector 
ixeeevard 2h = none 
°** Carm cut - return code in AL 
: 0 = OK, FF = unsuccessful 


cmp device type,disk_tyre 3;1s this a loppy disk? 

jne BU E ea sette sif not, use bubble routine 

mov CL, ‘ 

mov AL,DK_disk scombine disk selection 

sal AL,CL. swith opcode 

or AL bK write cmd ;create lopb for write 

mov DK 10 _con,AL ;load iopb 

Gal DK Execute Cmd ;perform the write 

HPS Wr lee Tet ;return 
Bubble write: ;use bubblé routine to write 

Meecad. t  hoosO Write sperform the write 

Write_ret: 

ret 


ae 


0 2 Rk ie ote ite te 2 ee ke ie a ee fe fee Ce Ae Rea ke eo ake ake i ae it a ie a 2a oe a 2 Kc 
oe * 
9 e YY = e @ a 

;* The following subroutines perform various specific = 


;x tasks for the abcve jump vectors. % 


IUGR ICIai i oii ioioi ini aor a Ia IOI a ak ak akc ai akc aie ae ake tea ale ake 3 a a ae 
2 fe ec 3 ee 2 ae ei oe ake ae 2 I I a a i ie a i a ie a eae ake ic ie aii ie ai ae 
;* . DEVICE INITS subroutine * 
0 Fe A ee I 2 ic i i te he 2k CR 2 te a a ai CR i kk i i ica ae 2 2 aC a i akc 2 ke 

~Camlegetcom: INLt. 
Device Inits: ;** Perform any init necssary for 

all devices generated. 

* parm in - none 
; “* parm cut - none | : 
mows Deyice initialization for the iSBC 202 disk ***) 
;load address of the iSBC 202 icpb (channel ccmmand) 


+ 


mov CL,& saad CL tor ssni tt 
mov AX,CS slcad AX with this segment 
sal AX,CL ;mcve segment to high b 


te 
add AX, offset DK_liopb ;o0ffset of iopc nen cmd) 
mov DK_iopb_addr,aAx ;stcre for later use | 
ssee if aot iSBC 202 controller to be initialized 
mor CX, CX ,ehear Cxor@r councer in, loop 
mov CL,num_log_disks ;load # cf disk’ devices 
enecksi202: 


mov BxX,CX sindex into device ¢tacle 
cmp device tablef{ BX j,disk_type pee OZ -dask © 
73 meee 220 2 Sle SO, goOminit the ccntr'ler 
room Check 1202 ;check next  — . 

Memgmps Done 2202 ;ne i202, gc init mbbsds 

mee 1202: 

in eee sus cae re ~cicanm the contrciler 
in AL ie eee | e. 
out DKP_réset AL ;AL 1S dummy for this command 

; (*** Device initialization for the MBB-80 bukble * & & ) 


feeietalize cach MBB=-80 centrolier defined 
Dene 1202; 
mor CAS CX cueat CXeror COunter in lcop 
mov CL,num_log_disks ;lcad # of disk devices 
meeoush Es ;Save register 
Poe mbbsd: 
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xor Bx, BX ;clear BX for index 

mov BL,CL Puead ECnt ct tO BX 

dec BX ssubtract 1 for table 

gad00 Fl, sl _ 3dacuble index for word lockup 

mov AX, 4B_logical_table[ BX] *get cont addr 

cmp AX,MBunull ;is it a null°addr (place holder)? 

je Next_mbb80 ;1£f so, go tc next cont'ler 
_ mov MB contbase, Ax sload to current base 
sinitilalize pagé size and minor loop size 

mov ES, AX ;ioa *o address bubble 

mov AX,MB_ maxpages j Fages per bubble device 

mov ES: MBP _loopsSize_lo,al ;Locpsize low byte 

mov ES: MBP_lcopsize_hi,aAH ;loopsize hi byte 
mov ES:MBP_pgsize_rég,ME_pagesize ;load page size 
sissue reset command tc the controller 

mov AL,MB_ reset_cnd ;cresét mask byte 


mov ES:“BP_cmnd_reg,AL ;issueé reset command 


sinitialize each bubble device 


push CX ssave CX, outer ccunter 
mov CX,MB_mnaxdevstl scounr Lor Llocoeérof devs 
mov AL,O device to initialize 


For_each: 


nov Bee ote Clee pt ;select each device 


mov ES:MBP_cand eae 


= init end 
ush AX!pusSh CxTpus 


sinit this device 
BS ;save bubble#,counter,Es 


Baia Mbb80 Wait “Watt fOr CONTEOLLEr 


pop ES! pop CX! pop AX j;restore 
inc SAL 


ES,counter,bubble# 


snext device number 


IoOp. FOr each ;dec CX, 


POP Cr ; restore 
Next_mbp80: | Jee 
Loop Inaitenbrso0 19 (o] st hoi law 
_ pop §S ;Lestcre 
eect et: 
re 


. 
9 
° 
9 
° 
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EXECUTE CMD subroutine 


loop if net zero 
CX CuLe Lr. COUNTeCr 


next cont 
register 


Be oe HK ie He oe ae eke He ah he He he I See aie ee he ake he ye Sle Se a oe ee Be He He He he eae He ee eC ac oe ee ee ee EK Oe a aK OK 


;* DK * 
oe Be coe ie Ae He Be AK Ae TE Be 2 a CT A EK I EE I 2 A a fe i 2 2K 1 at 2 ak he a he 2 2 3 


Dk_ Execute Cnd: k* Fxeecutes a dis 


* parm in - none 


@eeeve G6 


* Q0= 
mead retries: 


scalled from: READ, WRITE. - 
k read/write ccmmand 


x 
** Darm out - status of the op in AL. 
* CK, FF= unsuccessful 


mov DK_rtry_cnt,max_retries ;load count for retries 
ssend iopb to disk controller via two ports (2 bytes) 


Send_iopb: 
in Peon esus CEape ;clear the 
in AL,DKP result byte ;clear the 


GONEECL Ver 
controller 


mov AX,DK_iopb_addr ;get address of icpb. 
rom ke LOUD LOW,AL sOutoUut iow byte of icrb addr 


mov AL 


sicad high byte to AL for cutput 


A 
out DKP_iopb_high, AL wOuUcuegnepyte Of 10Pkt addr 
Mencck £Or interrupt from disk ccntroller 


hesk int: 


~in AL,DKP status ;géet disk status 


and AL,DK chkint_mask ;interrupt 
B2eviSsk Int ; 
ssee if interrupt si 
in AL,DKP result 
{, 00H 


 ] 


set? 


1f not, keep checking 

eee I/O completicn 
Veew,oee G2ason LOL interrupt 

W 

ol 


cmp A sWas I/O complete ? 

jz Check_result ;1f so, go check the result byte 
in AL,DKP result byte ;clear result sb Bae 

nov AL, 0808 ;disk wasn't ready - toad ccde 


jmps Retr 


9 
y =bead err ecde, 
scheck result byte £ 


Ci SrELecrs 
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Check_result:; 
in AL,DKP_ result _ byte ;get result byte 
and AL, OfSH semeck £OL CLErOr ih any bit 
jnz Retry smeund che, retry 
jieadd cChmecsre 25 OK, AL contains 0 for return 
pobS Dk_execute_ret. 
sretry the command until max_retries attempted. 
Retry: 
mov DK_err_code,AL ;save error result byte 
dec DK_rtry_cnt ;dec number of attempts sc far. 
minz Send 20pp sift net zero, send command again 
;did max _retries, no success - issue error message 
Ca Okeesim@oebere,Pprant Out appropriate err sg 
in AL,CONP data ;fiush usart receiver buffer 
call con Echo ;read upper case console character 
ChD whl, co 
je Geo. ee ;cancel 


cup Al,'* ; , . 
je Load_retries ;retry max tines again 
cmp AL,‘I' 
je Dk_execute ret ;igncre errer 
OF AL, OFF ssét code for permanent error 
jmps bk_execute_ret 
Rboot_jump: scan't make it w/ a short jump 
jnp wWBOOT 
Dk_execute ret: 
ret 


she he he ie fe fe ee ake ee ake 20 ee ie ee ff he fe a oe fe ps ei hee fe a a i ake i ke i ic i a a a ae a afc a le i a 8 2 2 
* DK_ PRINT ERR subroutine * 
ee HCA Re 2 ie 2h ie a ke oe he SRE hohe ic ah SR i ai a i i 2 2 2 i ae ie a he a 2 ee 2 i a oo a a KK 
;called frem: Ck_Execute_Cnd. 
Pier rint Ercs ;** Prints out disk error messages. 
;** parm in - uses DK_err_code 
(oe pare cut = pene 
mov BL,DK_err_code ;load code for index to table 
mov BH,0O ;sclear high byte of index. 
test BL,QEH ssee if error bits in low nibble 
pose sot Index ;etror iS in bigh nibble 
Use _ low_indéx: 


Seqge Ce Quewee 


mov BL,DK_err_loinx{BX] ;get offset in addr table 

jmps Print_it 7gO print the message 
Use_hi_index: ; 

mov CL,4 [Site LOoUL wbats braigat 

Shr BX,cL SSH r ceo > gn 


t 
a ROY BL,DK_err_hiinx{BX] ;get offset in addr table 
ment i: 
mov BX,DK_err_table{BX] ;load addr of message 
oe Print_Msg ;print appropriate message 
re 


9 
e 
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ie not lcader bics 
9 he ae 2a ie aie he pee ie fe ee ie he fe i i 2 ie he ie Ae fe oe fe A a A ie EE RO eA KC a IE Oe OK KC OE 
+x INIT BIOS INT subroutine * 
oie Hee oe ie 2 2 fe hc ie he i Ae ak a eS fe 2 ie AC i I RR a A iE a a oe Ok IK 2 
Healtod Crom. INSl. “af not Loader. bios) 
Init_Bios_Int:;** sets up the interrupt vectors in low 
;@* memory to vector soft/hard interrupts. 
oo Oagtieth = Nene 
;** parm out - none 
push DS!push ES ;save the DS & ES register 
mov iobyte,9 ;clear iobyte 


mov §ES,AX sset ES and DS to zere 
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ssetup interrupt 0 to address trap routine 
mov intO_ofrset,offset Trap_Handler 
mov intOQ_ segment,Cs 


mov DI,4% 
mov SI, sthen peeage ce 
mov CX,510 “GeEap VecCror tO 


rep movs AX,AX j3a11.256 interrupts 
;BDOS offset to proper interrupt 
mov bdos_int_offset,addr_bdos 
PoP ES ! pop DS ;restore the ES & DS register 
Ee 


EN DEE snot leader _bios 


IF loader bios | . | 
SEES ET IOSICSSOCCTIOCT STOPS OCT SST OS SCSSCSOSOP SSPE LST ee ET LE Se Tre Se" 
° x 


_ x INIT LDR_INT subroutine 
0 Ae I ea 9 te ie 2c 2k hc of ft He ee te SE ek ie tk 2 2h ee a i 2 a ke 28 a I a A A ee a a a oe CIC eo 
Joelle tous INIT. (2£ loader Eios) 
fee Ldr Int: ;** sets up the interrupt vectors in low 
;** memory to vector soft/hard interrupts. 
,7e spar®M in - none 
Dace owe — ncne 
;BDOS offset tc proper maga oS 
push DS ;ssave the DS register 
mov AX, sset to absolute low memory 
mov DS, AX. smake it addressable 
mov bdos_ int_offset,addr_rdos ;offset 
Mov bdos~int~segment Ss ;this segment 
mpOp DS “restore DS register 
sissue message telling where loading fron 
mov BX, offset msg_i202 ;assume 1202 
cmp deyice table,disk ue ;check default disk 
Joe te lOader ,; 22 disk, print med 
mov BX, offset msg_mpb ;its the mbb&0 
Beant loader; - 
Sali Print ae ;write msg to console 
s (additional Toader initializations go here ) 


ret 
ENDIF ;if loader_bios 


© 


? 

2 RIC a si See a eC fe eke a IO CR ICRC IORI a a a ARI IC AC ICC a RIC ie 

ane LOAD DMA ADDR subroutine x 

oe AK I He i ee 28 A a A oh oe SE ae 2 ke TR ae ee 2 a A i i ARE a I a ie fe fe aC a 2 te i ee 
Scanned £°0We INIT, SETDMA, SETDMAS. © . 

Load _Dma_Addrs;** upon new CMA acdr, updates all device's 


; x DMA words, Channel commands, etc., that 
,;** are needed because of a new DMA addr. 
;** parm in_- none, operates using variables 
: tea dma_offset and dma_segment. 
3** oarm Out - none, updates var DK _dma_addr 
supdate iSBC 202 disk controller dma address 
mov CL,4 siSBC 202 uses 16-bit address 


mov AX,dma_s¢gment ;ioad segment. 

Sat ax, CL ;move segment to high bits 

add AX,dma_offset ;add in dma offset 

mov Dk_dma addr,AX ;stcre new dma addr - disk 
>MBB-30 uses 20-bit address, therefore can use the 
;dma_segment and dma_cffset variables directly. 

ret 


eese 
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oR Re ee te te a 2 fe Ae i ke 2 ae AR i a fe eR ae a he Re ke A a 2 a abe oe ae 2 
3 MBB80 READ subroutine * 
6 ie It DIC ie eae ke ake a ie ic 2 2 he a oe eo ee a 5 2 i ke ee Re i ae Se RC ie fe a a fe ae i ake take 2 ae a a oe 2k 2 
;scalled from: READ. 
Mbr80_Read: ;#* reads a sectcr from bubble 
eases — none 
;** parm out - status of the op in AL. 
>** QOO0= OK, FF= unsuccessfu 

push ES ;save register 
call Mbb80_Sector_Xlat j;compute ist page# of sect 
sestablish addressability to controller 

mov AX,MB_contbase saddress orf cecntrcller basé 

mov ES, AX sload =S to address bubble 
;set multipage acde 


23008 


mov ES: 4BP_cmnd_reg,MB_apage_cnd ;multipage mode cad 
sload first page number fcr transfer 

mov AX,MB_ pageé_no ;current eos humkber 

mov ES: MBP pagésel_1o,AL ;page select lo byte 

mov ES: MBP_pagesel h:i,Aa page select hi byte 
;set number of pages to transfer = pages/sectcr 

mov ES: MBP_pagécnt_10o,MB_pages_sec pba to xfer 

mov ES:MBP_pagecnt_hi,O . shi Syte of # is Q 
;set up dma addréss tt receive data 

mov CX,MB_buflen scount fcor loop-buffer size 

push DS ;save CP/M's 

mov AX,dma_ segment ;get dma segment 

push AX ;save dma segment DS 

mov BX,dma_offset ;O0ffser of dma area 
sselect bubble device and issue read command 

mov AL,M4B_bub_no ;current bubble number 

pop DS ;done local, readdr dma area 


mov ES: MBP_select_Eub,AL;select current dev 
mov ES: MBP_cmnd_reg,M3_read_cmd ;issue read from FIFO 
Mat FOr interrupt Erem ccntrcller 
Read_int: 
mov AL, 2S:MBF_int_flag j;get interrupt status 
and “AL, MBwenkint. Wask 7INcCerLrupt set ? 
jz Read int sit zero, keep checkirg 
ssee if read enough fron bubble sector to £111 dma area 
cmp CX, (MB_buflen - sector_size) ;transferred enough? 
jnz Read_one ;l1f not, read another bytsa 
pop DS srestere CP/M's DS 
mov BX,offset MB_overflow ;reset dest to overflow 
;read from MBB FIFO buffer into dma area 


Read_one: . 
mov AL,2S:MBF_rdata_reg ;read a byte into accun 
Mov WSO Lae ;i0ad accum into dma area 
OC Gok ; ;2ncrement index | 
loop Read_int ;dec CX, loop if net Zero 
pus S foavemoo  LOr call 
call Mbb30 Wait ia EOE GOUtrOl Ler 
pop &£ srestore ES after call . 
mov ES:MBP_cmnd_reg,MB_inhint_cmd ;clear cont int 
pop ES plese ore LegGi Stier 
nov AL, 0 sindicate success 
ret 
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9 2 A He ie Ee KC ie AC RC Me A Oe ee HR a OR ER OR RK HK MRK KK 


om 


BBS8O0 SECTOR XLAT subroutine 


” * 
j RH MAAK A AAA AHH EAA EHR AEA THE EH A ererre ret STP Ter ter TTT ee er Se’ 


*called frem: Mbb&80O -Read, Mbb80_Write. 


pec SO Sector _Xlatsg3* computes Ist page# ror a given sector 


* on a single Chip: Based on 80 Sectors 
s** on each Chip - Sector = 123 bytes. 
;** parm in - none, works on sector 

,** Darm cut - none, updates MB_fage_no 


@eeese sees 


xor AX, AX ;set AX to 0 to held Ppage# 

xor Cx,CXx [ones CX for countes 

mov Gi sector J GCuLe cOlmoranciaticsy Loop 

xor D ;clear DX 

mov DL, MB_ sector ssect# for ist sect on trk 

add ele -add Ist sect# £0 me sect 

ec CL ;subtract 1 for the Loop | 

IZ THD PSO0.sx exit ;se€ct 11s page 0, no xlat 
Add_ skew: 

add AX,MB_skew ;add skew between pages 

GLC Tome ar Cally y 

Sbb AX,MB_maxpages ;mod to # of pages 

jae Dec _sé@ctor ;jump if positive (CF=0) 

add AX,M4B_ maxpages went (-), add back #pages 


Dec_sector: 
Loop Add_ skew ;dec sector#,add skew again 
Mbb80_sx_exit 


Mov 
ret 


’ 


’ 


Mbr80 Track_ 


Xor 
Mov 
add 
nov 
mov 
nov 
ret 


@eeeoedse @eewe 


* 
Me 
P 4 
MbES8O Wait: 


nov 
nov 
ee ZeCLO Ss 
mov 


Bele ~ page. no,Ax ;store page number 


ae. Te mee. aa oes... eS 
% 


TRACK XLAT subrou 


MBB80O tine * 
0 Ae HK i eK Ee i oR a eae ete ok fe els Pale a aiirc lincire gia 


,caomecod Srcm@: SHITRK. 
Xlat:3** computes EFubble #@ from track #. Gets 
-#k first bubble sector Gias0) ,icr that 
3;** track for later conversicn to page #. 
;** parm in - none, works on track. 
oe prm out - loads MB_bub_ne,MB_sector 
BX; oe ;clear BX for adda~ 
BL, track He codex =a2nd cx 
ouble track# for index 
Ax 1B track able{ ax}. ;get word rrom table 
MB bub _no,Aal low byte = bubb déevice# 
MB _sector,aAL *high yte = Ist sector# 


Me Me Ae ee HE she ole he AC ae ah he ie he He Re a 29 He he te Me eS oe ee Ke he EK EK oe ae Oe OK OM he EK 
* 


MBB80 WAIT subroutine 


(htt t ttt Pet SEP ESET SEP SESE SEE EP E PS ES SET ST TT SES TT SSS ST SS SS 


;called frem: Mbb80_ Init, MbbS80_ Read, 
Mbb80O Write. 

;** checks status of MBB cont for busy 
;** keeps checking (wait) until not busy 
;** parm in - none 


@ee8ew sé 


xc carn ‘oboe - 2nCcnrne 
AX, NB _contbase ; address of cont cLase 
ES, ake 7; load ES to addr buople 


AL, ES: MBP _ status reg ;get status register 


and AL,MB_chkbBusy_cnd 71S it all zeros ? 
z See zeTo ;if sc, keep checking 
Sent OUSY: 


Nov 
and 
sjales 
ret 


~@¢ 


AL, ES: MBP_status reg ;get status register 
AL, MB chkBusy_cad eee if pusy: and to mask 
Cont busy ieee us y, eck again 


730 





COI IOI IOI I I OICIO RIO III IEICE ACR SIO I. AOR AOR 9 RO a 


° te MBE80 WRITE subroutine * 
2 ke i a CE ae a eke 2 2 ae fe ee a A A I a a RR oe fe ie I a he 6 i 2 te 2 2 28 ak 
7CallCdpeecm: WRITE. 
Mbk80 Write: sxx writes a sector to bubble 
- ;** parm in - none 
;** parm out - status of the op in AL. 
;** O0= CK, FF= unsuccessful 
IP not leader_bios 
;save register 


ush ES 

fall sbb80 Sector Xlat ;get ist page# of sector 
sestablish addressability to controller 

mov AX,MB_contbase saddress of centreoller base 

mov ES,AX ;load ES to address bubble 
sset multipage mode 

mov ES: 4SBP_cmnd_rég,MB_mpage_cmd ;multipg node cmd 
sload first vagée numbér fcr transter 

mov AX,MB_ page_no ;current page number 

mov ES: MBP_pagésel_1o,AL ;page select lo byte 

mov ES: MBP _pagesel_ hi,AH ;page select hi byte 
sset number of pages fo transfer = pages/sector 

mov ES: MBP_pagecnt_1l1o,MB_pages_sec ;#fages to xfer 

mov £S: MBP Sees ata 0 shi byte of # is zero 
sset up dma address f¢r franster 


ete 


mov CX,MB_buflen-1 ;GOuUnE si or SO (g= hot size 

push ODS ;save CP/M's D 

mov AX,dma_segment *get dma segment 

push AX ;Save dma segment DS 

mov BX,dma_offset ;address of dma area 
sselect bubble device and issue write cad 

mov AL,MB Dub no scurrent bubble number 

mov ES: MBP_select_bub,AL ;select current dev # 

pop DS ;readdr dma area 

Mov s;load first byte 


peaeos : 
mov ES: 4BP_wdata_reg,AL jywrite byte to MEB buff 
mic BX ;increment index 
mov ES: MBP_cmnd_reg,MB_write_cmd ;send write to MBB 
swait for intérrupt frem ¢Ccntroller 
Neate int: 
Bey AL,ss: MBP int _flag ;get interrupt status 
and AL,MB_chkint_mask TIMcCerEunpt set ? 
iz Wriee nt ;1f zero, keep checking 
swrite into MBB FIFO tuffer from dma area 


mov eee | ;byte from dma to AL 

mov ES: MABP_wdata_reg,AL ;write a byte to MBB buff 
oe Dx. ;increment index 

loop Write int ;dec CX, oop ee note 2ero 
pop DS ;restore CP/&'s D 


push ES ; wcavec hs LOE call 

call Mbb80_ Wait ~aamee ror controller 

pop ES 3restore ES after call . 
mov ES: "BP_cmnd_reg,MB_inhint_cmd ;clear cont iat 
pop ES ;restcre register 

nov AL,9O sreturn success code 


ret 
PNDIF s;not loader bios 
’ 


oe he he Me eK He ee He Me he eK it He He HH HM HOR I HE ICE I Ke HK EE oe OK eke 
5d = PRINT MSG subrcutine 38 
oe te 2 ne i 2 i Se a ie A he He Fe ee i TE Se 3c AC I RI EI ER CE EI HE 
~oal cde mmc, DK Print Err, 

; Trap_Handier. 
eee. NS: ;** Prints a message to the console. 
;** parm in - address of mnessage in BX. 
Te par dsouc — Nene P 
cs get next char from message 


mov AL,[ : 
;1S it zero - end of messace ? 


B 
mest AL Da 
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jz Pmsg_ret io ZeL ore TUE 
L 


nov Cl; slcad parm for call 

push BX ;save address of message 
call CONOUT SOLlnt, Lt - 

pop BX srestore address of message 
Geb x snext character in message 


jmps Print_Msg next character and icop 
Pmsg ret; 
ret 


PEt etSSr EEE ES SELES EEE PEPE SEL EE SESE SES ES ESSE EEE TE EET SS tt SS 


ae 
. TRAP HANDLER sukrceutine * 
eE Ler rer SCOCE Cte Tt SrerrTrePePSEePrLcCee ro rere rr ere seer Pek ss S| 


scGalled from: VYectored to £rom CP/M interrupt 
Geaee Handler: ;** handles ail traps. 


;*k parm in - none 

; ;** parm cut - none 
eile TULCGkeahterEupts 
mov AX,CS 
mov DS,AX sget our data segment 
mov BxX,offset msg_inttrap . 
Galil Pran= sg 390 Beas cc 
told g ardastcp 


Me HE Me ee He MC a AE Hh Me HE He ACE He MC hee HEE HE HE ME ME HE EK Oe he OK OO oe EK OK 


ste 
* UCON_ECHC subroutine * 
2H i 3 he ee fe ah thc fe 2 2k fe te he ie ke 2g ae iN a eC aR RE Fe 29 CN aK he 24 eo 2h at ae oa a He 2 
;called frem: DK_Execute Cad. 
Uccn_Echo: Callas aks and echo a console char and shift 
;**® to upper case. 
Jar Palm in - none 
-** parm out ~- returns char read in AL 


call CONIN s;get a console character 
push AX ;save input parm 

mov CL,AL sicad parm for call 

call cONOUT ;echo to console 

pop ee oe ;restore input parm 

cmp A a 

jb Ucon ret sless than ‘a’ is ok 

cmp Z 

ja Ucon_ret Woeedtotemwhan!*Z! 1s ok 


SUD AL, ‘ae-*A* “else Shift to caps 
Ucon_ret: 
ret 


@eee 


eR We He ie He ic ae He He A Me a Ee EE I EC ee i He HE eR HC eK 


= Es DATA SEGMENT AREA Ke 
et Pt tf SS tSeeSPE ELSE SESE CSE SESE S SESE SSE TES ES SSS SSS SES ESSE SE ESS | 


data_offset equ offset $ 
DSEG ; 

chet, data_cffset j;contigucous with code seg 
2 ot wren rn nt ee nn nn nn Vatsa0leS =~ == —=— <= = 3-92 = ---- - =~ = & 
include config.def ;configuration table for all devices 
device type db disk type ;type of dev (default=floppy) 
disk. db 0 ;disk number 
DK_ disk db QOH sELOopUY ralsk controller disk # 
DK_érr_cod=s db OOH 


loz 





DK ELE savinx dp eOOneozod, 022,008 ,O24H, Se OH OGY Q26H 
DK err loinx $b OOH COE 04H 088 08H, Oai ,0€H,010H 
~ ae ib 0134, 0168, 0168, 6108.01 aft Sigh OfeH 
DK_err_table dw Evens cee era.” 
dwaeeEo em? .er8,cr9,<erA,erB 
dw erC,erD -OLE,eIF, erun erz0 
dw er4u6, er 80 
DK_iopb_addr dw 0 saddr of iopb (channel command) 
;This is the iSBC 202 iopb (channel command - 7 bytes) 
BK_iopb db OQO80H siopb channel word 
BR 2c com db QO 
DK_secs_tran aba snumker of sectors to xfer 
trac db 0 ;track to read/write 
eector db QO ;Sector to read/write 
DK_dma_addr dw QOQQOH j;dma addr for iSBC 202 
mend cL iopb 
ieee ry cnt db Q ;sdisk error retry counter 
dma_offset dw QO80H ;DMA offset (default) 
dma_segqment w 0 ;DMA Segment 
ickyte ap 90 
{ocal_stack Ea 22 slocal stack for initialization 
Stack_base equ offset $ 
MB_bub_ no rb 1 sbubble device numker 0-7 
MB _contbase dw OOOOH “segment base addr for contr‘ler 
MB_ overflow cD ea en -_sector_size) ;read overflw 
MB” page_no CW Os page number 
MB sector rb 61 bubble sector number (1- ae 
ween entry in the track eable corresponds to one cf the 
$24 «racks on the MBB-80. The ist ee in each ee is the 
sbubble number; the 2nd byte in each entry is the starting 
ssectcr number for that track on that bubble device. 
MB_track_table dw QQ0O0OH,0Q1laH 4H,0100H,011aH,0134H 
dw 0200H, 021aH,0234H,0300H,031aH,0334H 
dw O400H,041aH,0434H,0500H,051aH,0534H 
dw QO600H, 061aH,0634H,0700H,071aH,0734H 
2 = ¥ —— -—--—— string data area for ccnsole messages --------- * 
erd Ciewecc, (tf “Ne Error eee), 
er] Gibewe cr. w lf, "Deleted Record 70 
er2 doeworw, Cue FEEor >", 0 
er: sek ex§ 
er4 d CE ln SCCKMELLTOr.: ' 0 
ers equ er 
ere equ erd 
er? eau erd 
are CEuf AGaress Error :',0 
erg sete er 
era d Cant, | ube RCateror. :* ,0 
ere equ eér 
exc equ ¢r0Q 
aa 5B ae erg 
erFk a cr,if,'No Address Mark :',9 
erFk db cr, lf, 'Data VanKeerror +: ! ,0 
2r10 a) )ecr, if, "vata Overrun-Underrun :',0 
erzqg db cr,if,'Write Protect tie 8) 
er4Q Aeon ks Wert Ss Eeror :', 
erg0d. OD “cr, Jif, "Drive Not Ready mae e 
meg _inttrap mp Cr,1f 
db tintsrrupt TEap Hait! 
on cr, lf ,0 


2 
9 


ikels. 





ee Leader bios 
msg_signon dpe Cree, c., LE 
db 'CD/M— E6 Viceston 2.0, Cr, 1£,0 
msg_ i202 db ‘Loading Cry/M from an iSBC 202..',cr,1£,0 
msg_ mk doe woddennideGr/7M £2¢m an MBB-60..',cr,1f,0 
ENDIF slLoader_bios 
IF not loader_tios 
msg _signon db Cl, itecl, Lt 
_ db System Generated 11/05/81' 
db UNoadifved for 1SBC 202 Disk and * 
db 7583 “84 0 Bubble',cr,lf,0 


ENDIF 


read in disk definitions 
nelude dkprm.1lib 


Rote oaeers bios 


wakkkxK System Memory Segment Table *****x*x 


Ej we wowe we oi @e 


hen_desc_table db 1 71 ségments 
dw tpa_segment ;1st Seg starts after BIOS 
dw ig i sand extends to high RAM 
last _cffset equ offset 
tpa_segment equ (last_cffsettO4OQOHt15) / 16 
tpa_length equ addr_high_ram - tpa_segment 
, db 0 sfor GENCMC to fill last address 


oR KM KKK RE MRKKK Ond Of VarlaDlEeES KEKRKKKEK KK EKKKKKEKKKKKKKE 


@eGdewse COGtwedews 





RS eee eee cee ee ene SRE e ERE REE SS ESF EME Oe 
= DUMMY CATA SECTION 
oy SAE EE OE POPE Oe CE DOT EO PE Ee 
DSEG 0 sabsolute low memory 

org 0 “Start CP/M interrupt vectors 
imeeortset cw 1 
intQ segment Cw 1 

spad to bdes cali vectcr 
CW Cage cee a 1) 

bdcs_ iat_offset cw 1 saddr of bdos_int call offset 
Bae@ese int segment cw 1 saddr of bdos_int call segment 
Se eieeiianianartshel-t bhi ede ett 
: B-80 CONTROLLER AND PORTS 
Frege se ee eK HER TRAAS SL RETESARKAAES AEE AR ORLA RAGA RKAT 
ESEG 
MBE pagesel leo rb 1 jes EYte = eer page select, (0) 
Meeeeagesel hi rb 1 ;0s 2 bits for page select (1) 
MBE cmnd_reg = scommand register, (2) 
MBF rdata_ reg oo read data register, (3 
MBE wdata reg =o) I ;write data cégister, (4) 
MBE status reg rb 1 ;status Begqascer, (5) 
MBE pagecnt_lo rb 1 sis byte for page counter, (6) 
tBE-loepee as i ey “aS ies LOE page counter, (7 
Meeetcopsize lo rb 1 sis byte for minor Loop size, (8 
Mereltcopsize hi rb 1 cme gotes LOr min Loo oe: ‘ne 

Ew 7 ;internat use (page p08} 
MBE epgsize_ reg rb 1 epee Size cegister, 

rw Muse only, (D,z 
MBE select bub rb 1 -$ WO uses: Seiect pubbie dev + 
epee nt flag a2qu MEP_sei ect bub ~Ineewnups flag (F) 
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ake ond of Controller and Port definitions ****ex**x 


ae alee REL ee ee A AK Se a he Kew He eS VE 
° End of CE/N-86 Customized BIOS 
te eS ae ey at a ok a eK ee eek ARR x 


END 


@6eewe de B6we D6 


FILENAMES: Pascal = dkprm.def.te 
CP/M = dkprn. def => Toe iE 5k3e) 


Ollowing is the disk definitaicn for 
ustomized 8310S, CP/M-86. It is for the 
2 disk conttciler (double density) 

e MBB-80 magnetic bubble device cont- 
DD drives are #0 and #2, and the 

is #1. This definition includes all 
l parameters for each Bo eC as reqg- 
y P/M~86 for its 'GENDE PEcd Lam. 
produced by 'GENDEF® Brae Gnis tt. 
uded in the BIOS during ep see ie 
M-86 manuals for explanations 


to 
© 


iD 


OS aul Dt FO Fh 


HIPC oO oD 
Pht tr uct M 


ORPod OHM lrHotr} 
Mi fA ore 


Mt 
@ 


a 
b 
1 
/ 


2 ore 


aac 
~ 


52, ,2048 ,243,128,1 
1, 1426, 1024471, 52, 0,2 
ge 


rhrhehw wn aliens 


Cula tA tam 

DANA N 

hha puta 
md Oo 


$d pte fect sep e 


; PILENAMES: Pascal = CONFIG.DEF.TEXT 
CP/M = CONFIG. DEF 


this file describes the le ecu sige S between 
CE/M disk numbers and th isk device-dependent 
PacOrmation. CP/M-&6 alone se up tc 16 disks, 
snumbered from 0 to 15 decinal. 

This implementation is generated for 3 CP/M disks 


um_log_disks ¢qu 3 ;# of logical CP/M disks defined 


owe FJ we ee we ce se se wees ssewewe (f} Ci Pi PisPisee owt wowewewe we we seas wesess cesswe 


sThe following table descrikres what BIDS of device 

; ccrresponds +o each logical CE/M.disk number. There 
;mus be one entry fer each CPyM disk defined, with a 
maximum of 16 entries. This implementation only recog- 
nizges two Nes Boa 1SEC 202 and M4BB-80 disks. 
CE/M disk # *2 map tc 1SBC 202, while CE/M disk 
;#1 maps to 2a aBB_ 80. 


device table db disk_type,mbb80_type,disk_type 

;the following table maps logical eae ae numbers to 
wee 202 controller disk numbers (0-3 only, since this 
sitplementation has 1 iSBC 202 Serarly All CE/M 
eaisk numbers preceeding the last iS&C 202 disk must have 
moet cy —-- null, if nét an iSBC 202 disk 

S7nas in lementa*-on defines CP/M disk #0 and #2 to 
siSEC 202 controller disk numbers #0 and #1. 

ONS sob ae sett Olek 

Demeregical table db OOH,DK_null,018 

The following table maps logical CP/M disk numbers 

;tc MBB-80 ccntroller base segment addresses. All 
;CE/M disk numbers defined must have an entry (for 
epee eal ization) ~-- if no EB-80 exist ts at a logical 
sCE/M disk number, then the null entry must exist. 


1985 





@6 


MB_null equ OffffH 
MB logical_tabrle dw MB_null,08000H,MB_null 
“End cf configuration file 
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-FILENAMES: Pascal = M 


@eededege 


ok 

she 
oe 
ae 
x 
4 
om 
ba 
om 
> 
ok 
o 


SCaeeage Se age wot seessHoedcewewe a Gee ee 


AEPENDIX F 
PROGRAM LISTING OF MB8SQROM.A86 


B8SORCM.TEXT 
CP/M = MESOROM.A86 


t2cle¢ ‘Customized ROM Boot Loader! 


Mem bootstrap for ere On an iSEC 86/1<ZA 


wi the 
iSBC 201,202 Floppy Disk Ccntrollers 
an 
MBB=80 Contpeller 


pF SELES ESSE EEE PEE EET LESS SET EL ET SP EP ET TEP ESTEE TEESE SES ES STE SS 
* 


This Customized ROM leader fcr CP/M-86 has 
the following hardware SOT geese nent 
Peocessor:  iISEC 867 
bask, Ceneroller: tated Sec. 207 06,202 


Bubble memory: Sr nace With memcry-mapped Ivo 


Memory model; 


Programmers: J.A. Neufeld, M.S. Hicklin 
Revisions : 


© eM WM he HE ae Me Me he HH ie ae HC he ee He Me Me he EK eH Mee Ae ae he ye HK oe Eh oe A KK 


i ores oe er ny ee AEE SF 


SCSe se seseGe He Pe Ge Ge GeEGe Ge sPsewseGHse Se GsesHseGesesse ge GeEHsewe Gewese 
NAR R ORM OO ee OO OO 


This is the BOOT RCM which is resident * 
in the 957 mcnitor. To execute the boot * 
the monitor must be brought on-line and #* 
then oe el Apo age byedeea4:0 oF bY * 
grfd4;0 ea first monitor command * 
will Sees to an iSEC 202 disk and the 
second command willi kect to an MBB-80. 
First, the ROM moves a copy of its data 
tc RAM at location QOQOOOH, then it 
initializes the segment registers and the* 
meack POInter. The 18259 Pammpberas int- * 
BPS controller is setup for interrupts * 
aed to 17H (vectors at ee QOQQSFH) * 
Sere tELQgered auto-FOL (end of in- * 
Rocca modé with all interrupt levels * 
maske Bee: BPS the SFE device* 
@entroller is initialize and tiacx 
sect ee 1 is read =O determine the Soles 
pata h address for LCADER. Finall 
the Oa Hee on track 0 sectors 2-26 an 
track 1 sectors 1-26 is read intc the 
eet et address. Control then transfers 
he LOADER pregram for execution. ROM 
6° contains the evén ee locations, and* 
ROM 1 contains the od resseés. 6 * 
ROM uses RAM between OOCOOH and OOOFFH * 
(absolute) for a Scratch area. * 


HHH 


HHH HH HX 


TPE TT ET TE TTT CLE TCC CELT LCT 


aod 





oe oh i 2 ak ak 2c ak Kk 2 take 2 ak 2 2k ak EQUATES PEPE reLe Let es see EE ES St tS S| 
« * x 
a= Pe seceerancOus €quates =—=-===—----=-=--- 
: | re | 

er equ Od ;aSCl1l carriage return 

disk_type equ 01H faye Lor LSB 2 disk 

ipa equ Qa ;ASCii line feed _. 

mbéb80_ type equ 02H Bye for MBB-80 disk 

remseg equ Offd4H ;Base of this code in ROM 

sector_size equ 128 ;CE/M sector size 

Seart trk1 “qu Veen ;ckiset for trk 1, £¢cr° DMA | 
ee oe —— Moe se ome OlsOne POLtS  —==————==—=<—=<===-= 

. | 

CONP_data equ O0d8H ;18251 data port 

CONP_ status equv0dan wealLezolsStacus pert ) 
s--- Disk Controller command bytes and masks (iSBC 202) --- 


DK _chkint_mask equ 


OOUH smask 


to check for DK interupt 


CK home_cmd equ 003H ;move to home positicn command 
| DK_read_cmd equ OO4H ;réead command 
. | 
$= e------ INTEL iSBC 202 Cisk Contreller Ports ----------- 
| DKE_base equ 0785 ;ctrler's base in CPyM-86 
DKF_result_ *ype equ DKP_Fase+l ;operation result type 
DKP_result_byte equ DKP_raset3 ;operation result byte 
DKP reset equ DKP_btase+7 ;disk reset 
CKP_ status equ DKP_Lfase ;disk status _ 
CDKP_iopb_low equ DKP_btase+!l ;low addr byte cf iopb 
| DKP_iopb_high equ DKP_base+2 ;high addr byte cf iopb } 
=——-——---— Magnetic bubbie characteristics (MBE-80) -------- 
MB bufisn equ 144 ;curfer length for MBB sector 
MB_contbase equ 08000H oo geen base addr fcr centr 
MB_maxdevs egu 7 ;Cubble devices are #0-#7 
MB maxpages equ 641 ;# Of pages on each device 
MB pages_sec egu 8 ;# Of pages per icgical sector 
NB_pagesize equ 18 ;ouDbie device page size 
MB_<0s1_ page equ 0 vote raang pages 206 trkO,sect i 
MB tOs2_ page egu 12 wetameenGgG Pageteror trkd sect 2 
| MB _t1s1_page equ 312 ,etareceng pages LOL OS da 
$---- Magnetic bubble ccmmand bytes and masks (MBEB-80) ---- 


ME _chkbusy_cmd equ 
MB chkint_mask equ 
Meeshnhint _cnd equ 


O2Z08 sis. controiler busy ? status 


O80H j;mask 


SOecnKk LOS Mbb interupt 


O80H jsinterrupt inhibit/reset mask 
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e 
' 


nitialize the contrciler 
ulti-page mode operation cnd 
ulti-page read commard 

eset the contreller 


MB entt _cnd eg 
MB _mpage_cnd eq 
MB_read_cnd eq 
MB_resst_cnd eq 


aoGKG 
Oooeoaq 
SS ed ed od 
ONO 
a OF OF @ 0 

@e86 es woe 
Heel 


————— INTEL 18259 Programmable Interrupt Controller aan 
ite 59p1 equ OC Oh -8259a port 0 
2 aa equ OG2n “BZoga port 1 | 


_ ap we 42> ap aD OPP ae ee eee 2 eee ee ee Se ee ee ee Se es ee ee ee ee a a ee ee Ae ee ee ee ee ee a le 


ka IK ENTRY POINT AND MAIN CODE % 22 2% 228 22 228 22 


@eaewe woe 


CSEG romseg 


Entez here with gffd4:0 command for iSBC 202 boot 
mov DL, disk pe 5Set boot EYEE to disk 
jnmps Start boo ;go start code 

;Enter her? with Bras oan ccomnmand for MBB-80 boct 

mov DL, mbb80_type ;set coot type to mrb8s0 
erate boot: 
;move our data area into RAM at 0000:0200 


@aee0 


mov AX,CS soecune, EPSeto CS for source 
mov DS,AX 
mov SI, databegin sstart of data 


mov DI,offset ram_start ;offset of destination 

mov - ;séet dest segment (ES) to 0000 

mov ES, AX 

mov CX,data_length ;how much to move in bytes 

rep movs AL, AL ;move from eprom, byte at a time 
;set Segment registers and initialize the stack 

Nov 


i 
>< 


P ;set DS segment to,0000, now in RAM 
mov DS, AX ;data segment now in 4 
mov SS, AX A 4 
mov SP,stack_offset ;init stack segment/pointer 
eid ;clear the direction ag 
;setup SSS ee Programmable Interrupt Centreller 
nov ; 
out PIC eee 3;8259a ICW 1 8086 node 
mov AL,0190 
out Pre FE aa 3$8259a ICW 2 vector 40-5F 
mov AL,O1f 
out PIC 99p2,AL :8259a ICH 4 auto EOI master 
HOV AL, ULE 
out PIC 59p2,AL ;8259a CCW 1 mask all levels off 
MRARKRAKKAKEKEKE BRANCH TO SELECTED DEVICE FOR BOOT ***#4%xx4 4% 


saeeaewse 


Moots =i ne if beoting te iSBC 202 or to a MBB-80 
emp DL,d=sk Si oie thas va 22027 
jn2 Boot_Mbb8& wl ienoOt,  9Oct tO mbb80 


se ot esi eae ae oe a RAKHI TSEC 202 BOOT CODE 8% 2k HK 3 oR KH 


*eedewges 


Beet 1202: eee ar SO soctiLmenclLe Of fatal errors 
;Reset and initialize the 1MDS 800 Diskette Interface 
in AL,DKP result EYRE ;Cclear the controller 
2 


in AL,DKP result Lyte 

Cue DKP_ reset AL ;AL 1s dummy for this command 
shome the 1SBC ; 

mov DK io con,DK_hoeme_cad ;load io command 

call DK_Sxecute_Cmd ;home the disk 
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mov DK_io_ com,DK_réead_cud ;all io now reads only 
sget track 0; sector 1, the GENCMD header record 
mov BX,ofrset genheader ;orfset for 1st sector DMA 


mov DK dma_addr,Bx ;store dma address in iopb 

mov DK secs_tran,1 ;ctransfer 1 sector 

mov DK sector, 1 ;start at sector #1 

Gaus DK _Execute_cmd ;read track 0, sector 1 
sget track 0, sector 1, the GENCMD header record 

mov ES,abs_location ;segment loc for LCADER 

mov AX,E£S ;to AX to manipulate 

mov CL,04 “BUSt Xlat €O 16=b1lt addr 

sal AX,CL ;shift segment es 

mov DK dma_addr, Ax ;store dma address in iopb 

mov DK secs_tran,25 stransfer 25 sectcrs 

Mov DK sector, jomarct at sSectcr #2 

call DR_Execute Cad ;read trk 0, sects 2-26 
ag2c otek 1, sect I-26, put at next place in RAM 

mov X, FS scomfpute offset ter track 1 

add AX,start_trkl ;add in what already read 

mov , O04 smust xlat to 16-bit addr 

sal AXx,CL ;shift segment a 

mov DK dma_addr,AXx ;store dma address in lopb 

mov DK _secs_tran,26 ;transfer 26 sectcrs 

mov DK _sector,1 s;start at sector #1 

mov DK track, 1 ;start at track #1 

call DRK_Execute Cmca ;read trk 1, sects 1-26 

jnp Jump_To_Leader ;gO pass control to loader 


se oh he hk ok kde ok eee eK ~MBB-80 BOOT CODE #4 2% 42 42 ok ok tek ao KE 


Eeoc Mbb3so: 
mov AX,MB_contbase ;load base addr of MBB-@0 cont 
_ mov ES,AX” gmake Segment addressable 
sinitialize the MBB-80 controller ; 
sinitialize page size and minor loop size 
mov AX,MB maxpages ede per bubble device 
mov 2S:MBP loopsize_lo,aL ;lccpsize low byte 
mov ES:MBP Loopsize hi,aAH ;loopsize hi byte 
_ mov ES: 4BP_pgsize_reg 4B pagesize ;lLoad page size 
;issue reset command to the controller 
mov AL,MB_reset_cmd ;reset mask byte 
_ mov ES: MBP_cmnd_reg,AL ;issue reset command 
sinitialize each bubble device 
mov CX,MB_maxdevstl scount for locp-# of devs 
mov AL,0 sdevice # to initialize 
For_sach: ; 
mov ES: MBP_select_Eub,AL ;select each dévice | 
Mov ZS eee om eee de B_ inte ene ea this device 
u 


push ax ; save ble# 
call Mbb80_ Wait {$Wdeee LOL controller 
pop AX ;restore bubble# 
Ene AL ;next device number 
loop For each ecu Ck p= LOOD LL NGt Zero 
sget track U0, sectcr 1, the GENCMD header record 
mov BX, orfset genheader ;addr of dest in RAM 
mov AX,M%3_ctOs1_pagé¢ spage # for trk 0, sect 1 
nov CL,1 pur alsiect One SECTOL 
nov CH, i*4B Bedeeasce .f OL ba es to transfer 
cael “Hb80 Zea scead trk 0, sector 
sget trk 0, sect 2-26, put at abs loader address 
mov BX,abs_location ;f£rcom GENCMD header rec 
mov CL,4& sconvert to 16-bit addr 
sal BX,CL ;shift segment 
mov AX,4B_ tQs2_ page Spage stmror trk 0, Ssecta2 
Gov CL, 25 jthanSzter 25 Sectors — 
mov CH, 25*MB pages _sec ;# of pages to transfer 
e@eiitel “bb80_ Read ;cread trk 0, sects 2-26 
moet cick 1, sect 1-26, put at next place aloha 


190 





mov BX,abs_location vadar-or dest in RAM 

add BX,start_trk1 sadd those already read 

mov CL,4 scOnvert to t6—bit addr 

Sa 8c L sshift segment 

mov AX,MB_t1isi_page sfage # for trk 1, sect 1 

neu Sia 26 stihansmer 26 Sectors 
26*MB pages_ sec_ ae of pages to transfer 

Be cLil “Hb 580" Read tread trk 1, sects 1-26 


oe hk KK KIKHKEK PASS CONTRCL TO LOADER *%% 2% 4% & 4% KxKK HX 


Jump_To_ Loader: 
nov ES,abs_locatvion ;segment addr of LCADER 
mov leap_ segment,£S ; load 

ssetup far Tee wee aoe 
mov leap_offse etek of LOADER 
jnpf dword ptr Steere offse 


fe oe eR ee kk eK END OF MAIN CODE 2 0286 265% 202 26 20 2 22 2 2K 2 


5 RPRKKKKERKX BEGINNING OF SUBROUTINES KERXKRHKEKKKKK KKK EK EXK 


IR ISN Dialga ite alata dadadaliindadadhdiiaiadhiiniel 


= ok CONIN subrouti 
See et eeerent tater there tone e ete ene 


scalled from: CDk Execute Cnad 


Conin: = te 2k returns console keyboard “character 
2k parm in - none 
: *** parm out - returns character in AL 
in AL,CONP status ;get status 
and Mya (loeceureteoady=pice 1-15 set 
jz Conn TMeenOe, tls zero and not ready 
in AL,CONP data ;ready, so read character 
and AL, O7fH ‘henoVve Dakacy bit 
ret 


oh 3h fe he le ak ie ee he he te he i fe fe fe ake i a ke A Ac a a oie ico a i at fea ate a 2 ie ae ake 2 2 a ae 2 fe oe ee 2 2 2c 
* CONOUT subrcutine * 
PeErEtTE Lee s+ eri se rere Ss SEP ere rere rere SESS SE LESS STE SS St SS 
;called frems Print_Msg. 
Soncut: ;** write character to console keyboard. 
-#k parm in - Character to be Sucruce in CL 
-**k Darm cut - none 
in AL CONP_ status ;get console status 
and AL, sSEé 1f ready-bit O-is set 
aIPA CONOUT sif zero, not ready- Ree So es 
nov AL,CL Head 2nput bCazm to AL £or out 
ol as CONP_ data,AL ;output character to console 
ret 


@eese @6CG6 Se 


sis NaakeaiaataatantaatonlontasMiatesbeakasteataalaskeslaskeatenteatoatasMedhastasastasteseatoateateshiatostasletedtastastosteatasantenteiteatesisteatastentaaiestaaton 
DK EXECUTE CMD subroutine * 
PET tC SSOL SS SL eS e est + & FS PEELE S Se PET TEEPE ETT ET TTT EE TTT Te 
"Ga ledeitnem: in-line from Boot 1202. 

Dk_Execute_Cnod: ;** Executes a disk read/write Command 

ae parm in - DMA addr in BX. 

;** parm cut - none 
Dome © aiee controller via two ports (Zz bytes) 


Kt © 


wsoona i109 
send iopb; 
in AL,DKP_result_type ;clear the controller 
AAD, DKE Sesult | ee jebeareene Controller 
nov aAk,oftset DMELGobe,gec aagdress Of Lope 
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out DKP_iopb_ low, Wee ‘Output low byte cf ilopb addr 
mov AL, AH cad h hidmepytesto AL £Or cutput 
out DKP = Ou high, AL ;out high byte of orb addr 
eee fOumEa ceoLhup. trom disk Ccnttoller 
Desk “ime: 
in AL,DKP status nQec d1SkK) Stacus 
aoe aL DKechkint mask ;interrupt set? 
jz Disk int wyif.not, keep checking 
;see if interrupt ea I/O completicn 
in AL,DKP _resul ype Phage reason for interrupt 
cmp AL, OOF ywas I/O complete ? 
jz Check_result ;if SO, go check the result byte 
Japs Send eee ‘if not, go try again 
;check result byte for errors 
Check_ result 
Sth ALD &P result_byte ;get result byte 


and AL,0808 mac 1/0 oes lete? 
jnz Fatal aoe ;if not al error 
and AL, Of¢H ;check rss error in any bit 


132 DK_execute_ ret mo ELOors, gO return 
Fatal errs: 


mov CL,O ; sclear CL for counter 
BEest : 
rer AL,1 ;check each Fit of result 
ane (CL s;ccunt each bit 
test AL,01 stest each bit 
jz Ftes ;zZe€xro, go check next 
mov AL,CL *NOt Zero, e€LrroL, inc count 
mov AH,0O Sc lear high 
add AX, AX sdouble for idx to word tatkle 
mov BX, AX slcad BX aS index 
nov BX, errtbl BX } sget addr cf error msg 
oa Dro ria ex gpai(eya we Seog 
ea ekigl “isq- swrite msg to console 
ean Gouin ;wait for key strike 
jmp Boot i202 sthen start ali over 


Ck_execute ret: 
ret 


MBB80 READ subrouti 
PE Te Teer tr ter ee Per eres ests Serer Terr rere Tree 
s;called from: in-line from Boot_Mrb80. 
MbrE80_Read: 2k reads a sectcr from bubble 
“ig parm in - EX 1s the DMA cffset, AX is 
che the fof page # ror the meee CL 
has the Seccous to xfer, nd CH 
has the of pages to xfer. 
** parm ane - none 
sset ee ES Be mode 
mov ES: MBP_cmnd_reg,MB_mpage_ ones. smultipg mode cad 
slO©ad Elrst page number for transfe 
mov ES: MBP ee LO. oe ;page Eatece lo byte 
mov ES: “BPW pagess¢ aoe select hi cyte 
;set number of pe ze “trang er = pagesysectcr 
now ES: SBP SVegee ne — Lo,Cd wyccdes to xfer 
mov ES: MBP pagecnt_ hi, 0 chi. yeeroLes is 0 
psct wp dma addréss tc receive data 


’ 
Se heeaehiahahiedaebdaa OTT art oneent eons btubie MK KK KKH KKH side 4 
’ 
’ 


“~~ ee 


mov CH,0 1cleabwnd ghee pytorct cx 
Read_a_sector: 

“push CX ;Ssave # sectors te xfer 

mov CX,MB_buflen count for loop-buff size 


sselect Lcubble device aud issue tread command 
mov ES: MBP select Eub eee Ov i, 2 on dev #0 
mov ES: MBP_cmnd Crsg,8$. réad cmd’ -tead from FIFO 
’ ‘eee ROR Ine err wpe £Lon Ecntreller. 
ca Beno 2 


ay 
Oo 
RO 





mov AL,ES:MBE_int_flag ;get interrupt status 

and AL,MB_chkint_mask weleclrbup. Set «< ; 

jz Read int ;if zero, keep checking 
;see if read enough frcecm bubble sector to fill sector 


cmp CX, (MB_buflen - sector_size) ;xferred enough? 
jnz Read_one ;if nct, read another byte 
push BX ;save location in RAM 


sread from MBB FIFO buffer into dma area 


Read_one: 
mov AL,ES:MBF_rdata_reg ;read a byte into accun 


mov eae te ;load accum into dma area 
sljolien ee). 4 ;increment index 

loop Read_int ;dec CX, loop if not zero 
pop BX ;restore las cs in RAM 
op CX ;restcre # sects te xter 
oop Read_a_ sector ;read next sector 

call Mbb8U0_ Wait Meweis for controller  . 
mov ES:MBP_cmnd_reg,MB_inhint_cmd ;clear ccnt int 
ret 


ee ELTS ELS SLOSS SLCLOCSLS CTS SPP ST CC SS SCC SS TSOSCCSL Se TS SS 
ad MBB80 WAIT subroutine 4 
TerrtrrEerTICSe SLCC CCLICCT SSI SCTOCCSCCCLT CLT CSS SOCCL C$ L SL SS Se SS 
scalled from: Boot Mbb80, Mbb80 Read. 
*xk checks status Of MBB cont fOr bus 


@egpeDVse wpe Ss 


Mbb80_ Wait: - 
;** keeps checking (wait) until not busy 

rows 2 = none 
;** parm out - none 
S€e€_ Zero: 

mov AL,ES: MBF status reg ;get status register 

and AL,MB_chktusy_cad Poet ait, ZELOS 2 

jz See _ zero 1f so, keep checking 
Cont_pusy: . 

mov AL, ES: MBF status reg ;get status register 


and AL,MB_chkBusy_cnad ;see if oe and to mask 
sks Cont_busy ;if ktusy, check again 
re 


ie oi 90 oi oe ic ie fe ote Sie ic cake ie ke ae Sic ke ae a a ie a Rei ie i ac ee ote oft fe ea ae ake a 2h 2 ake ae ke fe ack ake ae 2 2c abe 2 ok 

= PRINT MSG subrcutine * 

Sie ak ai ie he Re ee ee ke he hc he eke ke iS fe 2h te ie i ke 2 2 2 a i ke aR ae fe of oe i 2 OE 2h ae fe 2 2h fe a 2 a ae ke fe ke 
;Ccalled frem: Dk_Execute_Cad. 

Print_Msq: ;** Prints a mesSage to fhe conscle. 

;** parm in - address of message in BX. 

oe Darn cut -sncne 
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mov CL,[ BX ] ;sget next char from message 
test Chen ;1¢ 1t zero - end of message ? 
nz peg =r ot <i f Zero  seturn 
push B ssave address of message 
ane CON © [Drone ot 
pop BX srestore address of message 
NCB x | snext character in message 
jJmps Print Msg j;next character anda icop 

Pmeg ret: 
ret 


ke op ok sek oe KICK END OF SUEROUTIN ES 2282 2 2 ae ok 22% sek 2 2 ok ok aeok 3 oka ok ak ok 
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s;Image of data to be moved to RAM 


databegin 2gu offset §$ 


"A templat2 isBCc 202 Sopb (Channel command - 7 bytes) 
db Q80H 2OpD Channel word 
ab 0 s10 command 
db Q smnumber cf sectors to xfer 
db Q strack to rea 
db QO ;sector to read 
dw OOOOH j3;dma addr for iSBC 202 
werd CL 1opb 
Cerrtbl dw offset erd 
dw offset ert 
dw Reset erZ 
dw offset er3 
dw offset ery 
dw offset er5 
dw offset er6 
dw offset er? 
Cerdg db Cron tf,  Nul deeper cre: <*,0 
Cert db Gril tf," CRC Error’ °0 
Cer2 db cr,lf,*Seek Error'’,0 
Céer3 db cr,lf,'Address Error',0 
Cer4 db cr,lf£,*Data Overrun-Underrun' ,0 
Cer5 db Gime, LE, f Aci te Pretect*® ,0 
Cer6é db Cage L wet cc EELOE® , 0 
Ger] db GE,LE&,° DELVE Net Keady*, 0 


dataend egu offset $ 


data_length equ dataend-databegin 


: reserve space in RAM fcr data area 
: (no hex records generated here) 
DSEG 0 
org 02008 

ram stare equ $ 
;sThis is the iSBC 202 iopb (channel command - 7 bytes) 
DK _iogb 20) 2 a siL0prk channel word 
CDK io con mb 4 ;10 command 
DK_secs_tran Eos, 1 shumker cf sectors to xfer 
DK track me | 4 Tomaex tO Lead 
DK Sector rete) ae ;sector to read 
DK_dma_addr cw 1 ;dma addr for iSBC 202 
wegea. CL LODD 
eee th) cw 8 
erc 5,19) length cerd 2416 
er] ib length cert 
erz rb Lengtn cer? 
hae = length cer3 
ery na 19) length cer4 -14 
EES scllo) length cer5 ao 
€r6 ic Jo) length cer6 aS 
er? rb length cer? = le, 
Meare offset rw 1 
leap segment CW 1 

rw Be | ;iocal stack 

2qu oftset 3;stack from here dcwn 


Seack crfset 
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7128 byte sector will be read in here-GENCMD header 
genheader eae otfset § 
tz 1 
Cw 1 
gas i CCation rw i sabscolute load location 
rw 
rw 1 


: Pert SSP St SESE LEP SESE SESE SESE ETE SESE SEEPS STE SES SESS TES ST St SS 


ie MBB-80 CCNTROLLER AND PORTS * 
oe A ie fe 2k ake oe fe aie AS AC 2 2h oft 3 a a of of fc ole 2 2 he fc i A 2c 2 2 aie ic ee ae ie a 2g 2 2c 2 a 2c ie 2 2K a 2 


ESEG 
MBE _pagesel_le rb 1 ;LS byte fer page select, (0) 
MBE _ pagesel_ hi rb 1 sms Z2 bits for page select, (1) 
MBE cmnd_r2g Eo 4 ;command register, (2 
MBE rdata_reg =O a ;cread data register, (3) 
MBE_wdata_reg tb 1 swrite data register, (4) 
MBE status _reg rb 1 ;sstatus register, 
MBE pagecnt_lo rb 1 ;ls byte for page counter, (6) 
meee agecee AS Coe | sms 2 bits for page counter, (7 
Meee icopsize_lo rb 1 sis byte for minor loorg size, (8 
MBE lcopsize_ hi rb 1 TiS es LOE RIN Loot size,(9 

rw 1 sinc en nat Beene pos), (A,B) 
MRE ¢gsize reg rb 1 jpegs Size register, (C) 

rw 1 sit use only, ({(D,£ 

MBE select_bub rb 1 stwo uses: Select bubble eve CE} 
Meee int flag equ MBP_select_Lub sinterrupt flag F 
:kAReARRRK End of Contréller and Fort definitions ***«k*ke xx 


SISO EC ao ok IO ao IOI GIDE a i tok 2k Cai ae a8 9) ae a fe ak i fe ae a a oe ok 
End of CP/M-86 Customized ROM af 
eee TTP TT SCE LI CTS SET ICT SCP PTC SC TC CTT TE TTT TTT TTT ttt ttt 


END 


@Q@eaesdseGowe @ 
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